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»TITLE CVCLHC DPV-11 DATA COMM. LINK TEST 
oREM & 


IDENTIFICATION 


PRODUCT CODE: AC=F582C-MC 

PRODUCT NAME: CVCLHCO DPV-11 DATA COMM. LINK TEST 
PRODUCT DATE: MARCH 82 

MAINTAINER: MERRIMACK DIAGNOSTIC ENGINEERING 


AUTHOR: 


BRUCE RIBOLINI-BRUCE LUHRS 


THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO _ CHANGE WITHOUT 
NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL 
EQUIPMENT CORPORATION. DIGITAL EQUIPMENT CORPORATION ASSUMES NO 
RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR IN THIS DOCUMENT. 


NO RESPONSIBILITY IS ASSUMED FOR THE USE OR RELIABILITY OF 
SOFTWARE ON EQUIPMENT THAT IS NOT SUPPLIED BY DIGITAL OR ITS 
AFFILIATED COMPANIES. 


COPYRIGHT (C) 1980,1982 BY DIGITAL EQUIPMENT CORPORATION 
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REASON 


ORIGINAL ISSUE, DCLT FOR THE 
DPV-11 


ADD *‘SET “ae COMMAND 
AD OMMAND 


ADD RPT" LEVEL 

ADD CHECK TO INSURE TRANSMIT LIST 
TOTAL = EXPECT LIST TOTAL 

UPDATE DOCUMENTATION 


ADD “C ABORT MESSAGE TO EVENT LOG 
ADD DDCMP PROTOCOL LAYER 
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Z ONE aye gg ths wl OTHER NODE PASSIVE 


ES ACTIVE 
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SEQ 5 


1.0 GENERAL INFORMATION 
1.1 PROGRAM ABSTRACT 


THIS DCLT (DATA COMMUNICATION LINK TEST) PROGRAM Is MEANT TO 
PROVIDE FIELD SERVICE mise on TOOL TO MAINTAIN DPV-1 

COMMUNICATION L THIS PR ALLOWS THE DPV-11 TO COMMUNICATE 
WITH OTHER SYNCHRONOUS CINCLUDING DDCMP) DEVICES ON POINT TO POINT 
OR MULTIPOINT NETWORKS. THIS DCLT PROGRAM WILL PROVIDE 

THE COVERAGE NECESSARY TO DETECT FAILURES TO THE COMPUTER 
EQUIPMENT, THE COMMUNICATION LINK, OR THE MODEM. 


THIS DIAGNOSTIC HAS BEEN WRITTEN FOR USE WITH THE DIAGNOSTIC 
RUNT IME setyi Ces SOFTWARE (SUPERVISOR). THESE SERVICES td 
THE OPERATOR AND TO THE SOF at ibe. cg ge! 


THE ytd ACE TO oP 

THIS PR CAN BE USED WITH XXDP+, ACT, ant IDE AND PAPER 
TAPE. FOR A COMPLETE DESCRIPTION OF THE ONT In SERVICES, REFER 
i THE XXDP+ USER'S s YY (CHQUS?. SEQ wwERE ? IS REV. LEVEL OF 


HE MANUAL). HERE IS A BRIEF DESCRIPTION OF 
THE RUNTIME SERVICES IN SECTION 2 OF THIS DOCUMENT. 


1.2 SYSTEM REQUIREMENTS 


IN ORDER TO RUN THE DPV DCLT PROGRAM, THE FOLLOWING 
MINIMUM HARDWARE IS REQUIRED: 
- A LSI-11 ¢ °., 
= MINIMUM OF res WORDS OF MEMORY 
TERMINAL 
= ANY XXDP+ SUPPORTED LOAD MEDIA 
= ONE OF THESE DPV-11 CONFIGURATIONS: 


DPV11-DB 
DPV11-DA 


1.3. RELATED DOCUMENTS AND STANDARDS 


= XXDP+ yer S MANUAL (CHQUS?.SEQ WHERE ? IS THE REV. LEVEL OF 
THE MANUAL = ‘C’’ IS THE CURRENT REV.). 


De Sieh ha Mc Mi acc Aas NAME Micaela 
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SEQ 6 


1.4 DIAGNOSTIC HIERARCY PREREQUISITES 


THE GOAL OF THE DATA COMM. LINK TEST ay eee IS TO TEST THE 
COMMUNICATION LINK AND THEREFORE ASSUMES T 
gLOCKs. DVP-11°S AT EACH END OF THE MtTNK HAVE ALREADY 


IF A ss CLOCK IS wr A THE PROGRAM WILL CONTINUE 

BUT ANY OF THE PROGRAM T TIMES THE DEVICE WILL HANG IF THE 
hat TIMES OUT. ALSO, i e EVENT LOG WILL CONTAIN A ZERO EVENT 
TIME FOR ALL EVENTS LOGGED. 


IT IS_NOT THE INTENTION OF A DATA COMM. LINK_TEST PROGRAM TO 
TEST THE DPV-11°S, BUT TO TEST THE COMMUNICATION LINK TO 
WHICH THEY ARE CONNECTED. 


SOME OF THE DIAGNOSTICS THAT COULD BE RUN IF EITHER OF THE DPV-11'S 
LOOK BAD: 


CVDPVXX DPV-11 FCTNL_ DIAG 
CXDPVXX_DPV-11 DECX MODULE 
XX= LATEST REVISION 


1.5 ASSUMPTIONS = RESTRICTIONS 


IT IS ASSUMED THAT THE COMMUNICATIONS DEVICE (A DPV-11) HAS 

BEEN TESTED ay THE PREREQUISTE Tati boRTTe THE my TOR 
SHOULD HAVE READ THE USER gy! ON PORTION OF THE LISTING 

TO FAMILIARIZE HIMSELF WITH THE COMMANDS AND CAPABILITIES AVAILABLE 
UNDER THE DIAGNOSTIC SUPERVISOR AND DCLT. 


THIS DIAGNOSTIC DOES NOT RUN THE DPV IN BIT STUFF MODE 
IT IS ASSUMED THAT IF «HE LINK WORKS IN CHAR MODE THE LINK 
WILL WORK IN BIT STUFF MODE. 


THE DPV11_ IS NOT A DMA DEVICE AND THUS MUST RELY ON THE 
SOFTWARE FOR SERVICE. THEREFORE THIS DCLT WILL NOT a, 

WITH THE DPV AT ITS HIGH CLOCK SPEED OF SOKHZ. WITH DDCMP PROTOCOL 
ENABLED THE HIGHEST SPEED TO BE EXPECTED(LIMITED BY CPU) IS 9.6KB. 
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SEQ 7 


2.0 OPERATING INSTRUCTIONS 

THIS SECTION CONTAINS A BRIEF DESCRIPTION OF THE RUNTIME SERVICES. 

FOR DETAILED INFORMATION, REFER TO THE XXDP+ USER'S MANUAL (CHQUS). 

2.1 COMMANDS 

THERE ARE ELEVEN LEGAL COMMANDS FOR THE DIAGNOSTIC ry oh a SERVICES 
OMMANDS AND GIVES A VERY 


(SUPERVISOR). THIS SECTION LISTS THE C 
BRIEF DESCRIPTION OF THEM. THE XXDP+ USER'S MANUAL HAS MORE DETAILS. 








COMMAND EFFECT 

START START THE DIAGNOSTIC FROM AN INITIAL STATE 

RESTART START THE DIAGNOSTIC WITHOUT INITIALIZING 

CONTINUE CONTINUE AT TEST THAT WAS INTERRUPTED (AFTER *C) 

PROCEED CONTINUE FROM AN ERROR HALT 

EXIT RETURN TO XXDP+ MONITOR (XXDP+ OPERATION ONLY!) 

ADD ACTIVATE A UNIT FOR TESTING (ALL UNITS ARE 
CONSIDERED hy BE ACTIVE AT START TIME 

DROP DEACTIVATE A_UNIT 

PRINT PRINT STATISTICAL INFORMATION (IF IMPLEMENTED 
BY THE DIAGNOSTIC = SECTI : 

DISPLAY TYPE A LIST OF ALt DEVICE INFORMATION 

FLAGS TYPE THE STATE OF ALL FLAGS (SEE SECTION 2.3) 

ZFLAGS CLEAR ALL FLAGS (SEE SECTION 2.3) 


A_COMMAND CAN BE RECOGNIZED BY THE FIRST THREE amet so 
YOU MAY, FOR EXAMPLE, TYPE ‘'STA’’ INSTEAD OF *'START’ 


2.2 SWITCHES 


THERE ARE SEVERAL SWITCHES WHICH ARE USED TO MODIFY SUPERVISOR OPERATION. 
THESE SWITCHES ARE APPENDED TO THE LE Cc S. ALL OF THE LEGAL 
SWITCHES ARE TABULATED BELOW WITH A BRIEF DESCRIPTION OF EACH, a 

IN THE DESCRIPTIONS BELOW, A DECIMAL NUMBER IS DESIGNATED BY “DDDDD"’. 


SWITCH EFFECT 


/TESTS:LIST EXECUTE ONLY THOSE TESTS SPECIF 
THE LIST. LIST IS A STRING 
NUMBERS, FOR EXAMPLE - /TES 
THIS LIST WILL CAUSE TESTS 
BE TESTS WI 


AL 
/PASS :DDDDD EXECUTE 49444 PASSES (DDDDD 
/FLAGS:FLGS SET Ast IED_FLAGS. FLAGS ARE 


/EOP:DDDDD REPORT OF PASS MESSAGE AFTER 
DDDDD PASS 


= 170 
/UNITS:LIST 
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EXAMPLE OF SWITCH USAGE: 
START/TESTS: 1-5/PASS : 1000/E0P: 100 


THE EFFECT OF THIS COMMAND WILL BE: 1) TESTS 1 worth 5 WILL 

ENECUTED, 2) ALL UNITS WILL TESTED, 1000 TIMES AND 3) THE END oF 
ASS MESSAGES WILL BE PRINTED AFTER EACH 100 PASSES 

SUITCH CAN BE RECOGNIZED BY THE FIRST THREE CHARACTERS. "YOU MAY, 

FOR EXAMPLE, TYPE "'/TES:1-5" INSTEAD OF "'/TESTS:1 


BELOW IS A TABLE THAT SPECIFIES WHICH SWITCHES CAN BE USED BY EACH 
COMMAND. 


TESTS PASS FLAGS €0P UNITS 





START xX x x x x 
RESTART X x xX x x 
CONTINUE x x x 

PROCEED x 

DROP : 
PRINT 

DISPLAY 

FLAGS 


ZFLAGS 
EXIT 








J1 


SEQ 9 
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2.3 FLAGS 


FLAGS ARE USED TO SET a4 CERTAIN OPERATIONAL PARAMETERS SUCH AS 
LOOPING ALL FLAGS ARE CLEARED AT STARTUP AND REMAIN 
CLEARED UNTIL EXPLICITLY SET USING THE FLAGS SWITCH. FLAGS 
ARE ALSO CLEARED AFTER A START COMMAND UNLESS SET USING THE 
FLAG SWITCH. THE ZFLAGS ee 7 ALSO BE USED TO CLEAR 
ALL FLAGS. yi THE EXCEPTION OF THE START AND ZFLAGS COMMANDS, 
NO COMMANDS AFFECT THE STATE OF THE Aang THEY REMAIN SET OR 
CLEARED AS SPECIFIED BY THE LAST FLAG SWITCH. 





FLAG EFFECT 

HOE HALT ON ERROR = CONTROL IS RETURNED TO 
RUNTIME SERVICES COMMAND MODE 

LOE LOOP ON ERROR 

IER* INieIt ALL ERROR REPORTS 

IBE* INHIBIT ALL ERROR REPORTS EXCEPT 
FIRST LEVEL (FIRST LEVEL CONTAINS 
ERROR TYPE, NUMBER, PC, TEST AND UNIT) 

IXE® INHIBIT EXTENDED ERROR REPORTS (THOSE 
CALLED BY PRINTX MACRO'S) 

PRI DIRECT MESSAGES 10 LINE PRINTER 

PNT PRINT T TEST EST NUMBER AS TEST EXECUTES 

UAM UNAT TEND DED MODE (NO MANUAL INTERVENTION) 

ISR INHIBIT STATISTICAL REPORTS (DOES NOT 
APPLY TO DIAGNOSTICS WHICH DO NOT SUPPORT 
STATISTICAL REPORTI 

IDR INHIBIT PROGRAM DROPPING OF UNITS 

ADR EXECUTE AUTODROP CODE 

EVL EXECUTE EVALUATION (ON DIAGNOSTICS WHICH 


HAVE EVALUATION SUPPORT) 
*ERROR MESSAGES ARE DESCRIBED IN SECTION 3.1 
SEE yes XXDP+ USER'S MANUAL FOR MORE DETAILS ON FLAGS. YOU MAY 
MORE THAN 


SPECIFY ONE FLAG WITH THE ae | at's FOR EXAMPLE, 
} ie TH OGRAM TO LOOP ON ERROR, INHIBIT ERROR REPORTS 


TYPE A BELL ON ERROR, YOU MAY Use THE FOLLOWING STRING: 
/FLAGS : LOE : IER:BOE 
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SEQ 10 


2.4 HARDWARE QUESTIONS 


WHEN A pines tts IS STARTED, THE pe ib SERVICES WILL PROMPT 
THE USER FOR HARDWARE INFORMATION SY TYPING ‘CHANGE HW (L) ? 

YOU MUST ANSWER *'Y’' AFTER 4 START COMMAND UNLESS THE HARDWARE 
INFORMATION HAS we “PRELOADED'' USING THE SETUP UTILITY (SEE 
CHAPTER 6 OF THE XXDP+ USER'S MANUAL). WHEN YOU ANSWER THIS 
QUESTION WITH A "'Y"’, we RUNTIME SERVICES WILL ASK FOR THE NUMBER 


THE 4 fon” COMM. LINK TEST PROGRAM WILL NOT USE MORE T 
ONE UNIT. FOR THE DPV-11 , THE HARDWARE INFORMATION REQUESTED 


# UNITS (D) ? 1<CR> 


UNIT 0 

FULL DUPLEX OPERATION : (L) 
DPV CSR ADDRESS : (0) 160170 2 
INTERRUPT VECTOR ADDRESS: (0) 300 ? 
REMOTE NODE ° L) N? 

IS THIS A MULTIPOINT NETWORK: (L) N ? 


THE FULL DUPLEX QUESTION SHOULD | BE ANSWERED ‘'Y'’ WHEN USING 
FULL DUPLEX MODEMS.OR NULL MODEM, OR MODEM ELIMINATORS. 
ANSWER "WN FOR HALF DUPLEX MODERS. 


REMOTE NODE ITEP SHOULD BE a 37 rips OTHER NODE 

IS RUNNING SOFTWARE THAT IS USING EP** FORMATS(I.E. 
PDP-11 RUNNING INTERPROCESSOR TEST PROGRAM (IT EP)) ms 
IF OTHER NODE IS ITEP THEN THE ABOVE ‘MULTIPOINT NETWORK 
QUESTION WILL NOT APPEAR. 


4 TO THE ‘MULTIPOINT NETWORK’ QUESTION YOU RESPOND WITH ‘‘YES"* 
ADDRESS THIS STATION: (D) A ? 


WILL BE DI YED. INPUT THE DECIMAL TRIBUTARY NUMBER (1-255) 
OF THIS DPV-11. 
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SEQ 11 


2.5 DATA COMM. LINK TEST COMMANDS 


THE "DCLT>’’ COMMAND LEVEL FOLLOWS THE ANSWERING OF THE HARDWARE P-TABLE 
ry ite THESE COMMANDS CAN BE TYPED WHEN THE ‘DCLT> (A) ?'* PROMPT 


MESSAGE CO COMMANDS AVAILABLE: 


YOU ONLY HAVE TO TYPE ENOUGH CHARACTERS TO UNIQUELY SPECIFY A COMMAND. 


THE ty LINE | is INTERPRETED FROM LEFT TO RIGHT. a bd 
IF . QUALIF ae THE COMMAND 4 IS RELATED OR EFFECTS A QUALIFIER 
TO THE LEFT THE COMMAND LINE, THE ar RARTHEREST TO THE RIGHT 
TAKES PRECEDENCE SINCE mit IS INTERPRETED LAST. (I.E. IF /CHECK..... 
..-/NOCHECK APPEAR ON THE SAME LINE, NOCHECK WILL BE INDICATED IN THE 
PARAMETERS WORD.) 


REFER TO SECTION 6.0 FOR A DESCRIPTION OF THE DIFFERENT MODES OF 
OPERATION AND THE TYPES OF MESSAGES AVAILABLE. 


2.5.1 MESSAGE COMMANDS 


COMMAND DESCRIPTION 


’. CLEAR EXPECTLIST ZEROES THE EXPECTLIST (00°S) 
AND THEN PUTS permet ITEP MSG 
IN SO NOT REALLY EMPTY 


CLEAR TRANSMITLIST FILLS TRANSMITLIST (000°S) 


AND THEN PUTS as ITEP MSG 
IN SO NOT REALLY EMPTY 


SET EXPEC TMSG=TYPE/QUAL DEFINE A MESSAGE TO BE PUT ON 
THE EXPECTED LIST 
WHERE : “TYP ** 18:3 


=ALPHA 
="A~2,0-9,SPACES OR TABS IN QUOTES"’ 
WHERE THE OPTIONAL ‘‘QUAL’’ IS: 


m1 
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SEQ 12 


/SIZE=NNN a THE MESSAGE _‘‘NNN"* as | 
ONG. (DEFAULT VALUE IS 
sive OF MiB SPEC i BY 


OPERATOR OR S. 

/COPY=NN al MESSA 4 INTO THE 
IS 0 = PUT THE MESSAGE IN 
ONLY ONCE) 


NOTE: SET'S ADD MESSAGES TO THE LIST IN THE a a THEY "RE 
DEFINED. ote IS A DECIMAL NUMBER. THE FIRST SET 
OVERWRITES THE DEFAULT ITEP MESSAGE PLACED THERE BY 
INITIALIZATION OR A *'CLEAR'* COMMAND. 


SEE SECTION 6.2 FOR A DESCRIPTION OF THE PRE-DEFINED 
MESSAGES THAT ARE AVAILABLE. (ZEROS,ONES ...) 


ag 
° 


' SET TRANSMI TMSG=TYPE/QUAL DEF be A_MESSAGE eae PUT ON 
(SEE DESCRIPT FOR SET EXP) 


SET EXPECT=TRANSMIT MAKES _A_COPY OF THE TRANSMIT 
LIST IN THE EXPECT LIST. 


SHOW EXPECTLIST wag THE ttre sy AND TYPE 
THE MESSAGES IN THE 
EXPECT LIST 


SHOW TRANSMITLIST Lis?s a, MESSAGE SIZE ae TYPE 
FOR THE MESSAGES IN THE 
TRANSMIT LIST 


2.5.2 STATISTICAL C COMMANDS 


COMMAND DESCRIPTION 


PRINT TAKES THE OPERATOR TO THE 
REPORT LEVEL °RPT>*. FROM 
ree. YOU CAN EXAMINE THE 
EVENT LOG. 


DUMP SSSSSS-EEEEEE/B PRINTS T EOCATIONS, BE TYE OF 4 


MEMOR IONS, BETWE 
OCTAL _APDRESSE Sr BSgS85 AND 
wal”. EEEEEE' WHERE “'SSSSSS"' 
WHERE *'/B" IS OPTIONAL: THE START ADDRESS. AND 
DEFAULT 1S PRINT WORDS "EEEEE'’ IS THE END ADDRESS. 
7p" CAUSES PRINT BYTES 


IF ‘“EEEEEE’’ IS NOT SPECIFIED 
THEN THE CONTENTS OF ‘‘SSSSSS" 
IS PRINTED IN WORD FORMAT. 


CVCLH _DPV-11 
CVCLHC.P11 
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IS PRINTED IN WORD FORMAT. 


NOTE: THE DUMP COMMAND IS USEFUL FOR EXAMINING 


MESSAGE DATA. STARTING ADDRESSES CAN 
BE FOUND BY LOOKING IN THE EVENT LOG. 


2.5.3 RUN COMMAND 


COMMAND DESCRIPTION 
RUN MODE=MTYPE/QUAL STARTS DCLT EXECUTING IN THE 
MODE SPECIFIED 
NOTE: MODE=ACTIVE IS NOT DEFAULT, A MODE=MTYPE MUST BE TYPED 
o---- EACH TIME A RUN IS TYPED 
WHERE THE ‘MTYPE’’ IS ANY ONE OF THE FOLLOWING: 
=ACTIVE (FORCES /NOECHO .NO LOOPING) 
=PASSIVE (FORCES NO L ) 
=RECEIVE FORCES /NOECHO ,.NO LOOPING) 
=LISTEN FORCES /NOECHO .NO LOOPING, /NOCHECK) - 
= SMIT (FORCES /NOECHO .NO LOOPING, /NOCHECK) 
=TALK (FORCES /NOECHO .NO LOOPING, /NOCHECK) 


=DOWNLINELOAD (DOWN-LINE-LOADING IS NOT SUPPORTED 
FOR DPV-11 TO DPV-11 LINKS). 


(FORCING NO LOOPING MEANS IT MUST BE 


SPECIFIED AS A QUALIFIER ANY TIME ITS 


DESIRED, THERE IS NO DEFAULT) 
AND OPTIONAL ‘‘QUAL"’ IS ANY COMBINATION OF THE FOLLOWING: 


/CHECK/NOCHE CK ENABLES/DISABLES CHECKING OF RECEIVED 
DATA AGAINST THE EXPECTED DATA 


NOTE: IF BOTH NODES IN ACTIVE AND “‘/NOCHECK’’ IS USED, 
ND-OF =PASS IS ECEIVING 1 MESSA 
AND ST. WITH NO DATA 
23 CHECK ING ao I TO KNOW HOW 
MANY ME T 
/STATUS/NOSTATUS cua SS HM: 
/ECHO/NOECHO = ENABLES/DI i 


(IGNOR 
/MODEM/NOMODEM/ ENABLES /B1S 04, THE RE 


IN 
/LOOP=L TYPE SPECIFIES WHICH, IF ANY, TYPE OF 
MAINTENANCE LOOPBACK IS BEING USED. 


SEQ 13 
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SEQ 14 


(IGNORED IN MODES OTHER THAN ACTIVE) 
MUST BE SPECIFIED EACH TIME ELSE NO 
LOOP IS USED. 


“LTYPE’’ IS: 
=IJNTERNALTTL LOOPS DATA INTERNAL TO USYNRT 


=CABLE ue wsoe FOR TESTING WITH H3260 
H3259 TURNARROUND CONNECTOR 


NOTE: THIS SKIPS OVER THE CHECK 
FOR MODEM READY WHEN DTR IS SET. 


=LOCALMODEM NOT USED BY DPV 
=REMOTEMODEM te az 


/PASS=NN SPECIFIES NUMBER OF ITERATIONS TO MAKE BEFORE 
END-OF=PASS. DEFAULT VALUE OF 1 
WILL BE USED ON ANY RUN THAT A /PASS=N 
I T ADDED TO THE * COMMAND. 


S NOT AD "RUN . 
IF A ‘'=1"' IS TYPED THEN THE PROGRAM 
RUN UNTIL A “C IS TYPE 


/PROTOCOL ENABLES SUBSET OF DDCMP PROTOCOL = THE DPV CAN 
NOW COMMUNICATE WITH ‘‘INTELLIGENT’’ SYNCHRONOUS 
DEVICES THAT SUPPORT DDCMP PROTOCOL IN THEIR 
MICROCODE. (DMR,DMC,DMV OR DMP) 


/NOPROTOCOL DISABLES DDCMP PROTOCOL - THE DPV NOW RUNS IN 
NON~PROTOCOL MODE. COMMUNICATION POSSIBLE ONLY 
BETWEEN DPV'S OR DUP TO DPV LINKS RUNNING DCLT. 
WHEN COMMUNICATING WITH AN ITEP PROGRAM ALWAYS 
SELECT NON-PROTOCOL MODE. 


NOTE: tS SECTION 6.1 cm S A me tl 


THE “RUN MODES Es" 


C 2 
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SEQ 15 


2.5.4 DEFAULTS 


IF NO “ah S** THEN THE DEFAULT IS E AS IF TYPED: 
T TRANSMITMSG=I gh bt 8/COPY= 
ET EXPEC TMSG=1 TEP/S1ZE=58/COPY=0 


ONES = /SIZE=64/COPY= 

ZEROES ~ /S1ZE=64/COPY=0 
OALT = /SIZE=64/COPY= 

TALT = /SIZE=64/COPY= 

CCITT = /SIZE=64/COPY=0 
ALPHA = /SIZE=65/COPY=0 
irre - /SIZE=5 /COPY=0 

. SPEC'D = /SIZE=LENGTH-OF -TEXT-TYPED-BE TWEEN-QUOTES/COPY=0 


FOR THE RUN COMMAND THE DEFAULTS ARE: 
RUN MODE=ACTIVE/NOSTATUS/ CHE CK/NOECHO/NOMODEM/PASS=1 /NOPROTOCOL 
NOTE: MODE=ACTIVE IS NOT DEFAULT, A MODE=MTYPE MUST BE TYPED 
wne-= EACH TIME A RUN IS TYPED 
IF THE DCLT PROGRAM IS RUN IN UNATTENDED MODE (UAM FLAG=1 OR CHAINED), 
THE DEFAULTS ARE AS IF THESE SETUP AND RUN COMMANDS WERE TYPED: 
SET TRANS=ITEP 


SET EXPECT=ITEP 
RUN eetnionnsiintaly <0 0 "~~: etapa teaimacatatets 





ASS=1/NOPROTOCOL 
OTHER NOTES: 
“Cc ALWAYS RETURNS YOU TO ‘DR>*’ (THE SUPERVISOR) 
<CR> IS SEEN AS A COMMAND TERMINATOR 


**RUBOUT"’ DELETE LAST CHAR. TYPED IN COMMAND STRING 


CVCLHC Won oR oO 
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2.5.5 PRINT COMMAND 


| 


Ly 3 PRINT COMMAND TAKES YOU TO THE REPORT LEVEL ‘RPT>*. 
THE COMMANDS AVAILABLE IN RPT> ARE ... 


LOG 
COUNTERS/FULL 


COUNTERS/ERRORS 
COUNTERS/OF F SET=NN 


2.5.6 MISC COMMANDS 


DESCRIPTION 
PRINTS HELP INFORMATION FOR RPT> 


RETURNS YOU TO THE LEVEL THAT YOU 
ENTERED FROM. (DCLT> OR DR>) 


PRINTS THE DCLT EVENT LOG 


PRINTS THE ENTIRE DDCMP STATISTICAL AND ERROR 
LOG. SEE SECTION 4. 


PRINTS ONLY THE DDCMP ERROR LOCATIONS OF THE LOG. 


PRINTS A SINGLE LOCATION OF THE LOG AS SPECIFIED 
BY THE OCTAL WORD OFFSET VALUE(NAD. 


NOTE:: THE DDCMP COUNTERS WILL BE DISPLAYED 
ONLY WITH PROTOCOL ENABLED(/PROTOCOL). 


DESCRIPTION 


on THE DCLT> > LEVEL RETURNS YOU 


PRINTS HELP INFORMATION 





SEQ 16 
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SEQ 17 


2.6 QUICK START-UP PROCEDURE (XXDP+) 
TO START-UP THIS PROGRAM: 


1. 
2. 


Ww 
« 


aw & 
- is. eS 


BOOT XXDP+ 


GIVE THE DATE AND ANSWER THE LSI AND SOHZ (IF THERE 
IS A CLOCK) QUESTIONS 


TYPE ‘'R NAME'’, WHERE NAME IS THE NAME OF THE BIN OR BIC 
FILE FOR THIS PROGRAM 


TYPE ‘START’ 
ANSWER THE "‘CHANGE HW"* QUESTION WITH ‘'Y*’ 


ANSWER ALL THE HARDWARE QUESTIONS. THE NUMBER OF UNITS 
THAT CAN DCLT CAN USE IS ALWAYS ‘‘l"*. 


WHEN YOU FOLLOW THIS PROCEDURE YOU WILL BE USING ONLY THE 
DEFAULTS FOR FLAGS. THESE DEFAULTS ARE DESCRIBED IN SECTION 2.3. 


7. 


AFTER THE ‘DCLT> (A) ?°* PROMPT, TYPE 
"RUN MODE=ACTIVE<CR>** 


WHEN YOU FOLLOW THIS PROCEDURE YOU WILL BE USING THE DEFAULT TRANSMIT 
AND EXPECTED MESSAGES. THE DEFAULT PASS COUNT AND ° . oy? iees 
ARE ALSO BEING USED. THESE DEFAULTS ARE DESCRIBED IN SECTION 2.5.3. 


' s 
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3.0 ERROR INFORMATION 
3.1 TYPES OF ERROR MESSAGES 


THERE ARE THREE LEVELS OF ERROR MESSAGES THAT MAY RE ISSUED BY 
DIAGNOSTIC: GENERAL, BASIC AND EXTENDED. GENERAL ERROR MESSAGES 

ARE ALWAYS. PRINTED UNCESS THE “IER FLAG is SET (SECTION 2. 

THE GENERAL ERROR MESSAGE IS OF THE FORM: 


NAME TYPE NUMBER ON UNIT NUMBER TST NUMBER PC : XXXXXX 
ERROR MESSAGE 


»WHERE; NAME = DIAGNOSTIC NAME 
TYPE = ERROR TYPE (SYS FATAL, DEV FATAL, HARD OR SOFT) 


NUMBER = S 

UNIT NUMBER = 0 = N (N_IS LAST UNIT IN PTABLE) 

TST NUMBER = TEST AND SUBTEST WHERE ERROR OCCURRED 
PC:XXXXXX = ADDRESS OF ERROR MESSAGE CALL 


BASIC ERROR MESSAGES ARE MESSAGES THAT CONTAIN SOME ADDITIONAL 
INFORMATION ABOUT, THE ERROR. E ALWAYS PRINTED UNLESS 
HE “IER'' OR “IBE" FLAGS ARE SET (SECTION 2.3). THESE MESSAGES 
ARE PRINTED AFTER THE ASSOCIATED GENERAL MESSAGE. 


EXTENDED ERROR MESSAGES CONTAIN SUPPLEMENTARY ERROR INFORMATION 
SUCH _AS REGISTER CONTENTS OR DATA. THESE ARE ALWAYS 
PRINTED UNLESS THE IER’, IBE'' OR "IXE' FLAGS ARE SET one raen 2.3). 


THESE MESSAGES ARE PRINTED AFTER THE ASSOCIATED GENERAL 
MESSAGE AND ANY ASSOCIATED BASIC ERROR MESSAGES. 


3.2 SPECIFIC ERROR MESSAGES 


3.2.1 COMMAND LINE INTERPRETER ERRORS 

ERROR MESSAGE: MEANING 

?ILL CMD-BAD SYNTX? A_COMMAND WITH AN ILLEGAL CHAR WAS 
TYPED = RETYPE THE COMMAND. THE 
VALID COMMANDS HEIR SYNTAX ARE 
SHOWN IN SECTION 

2INCMPLTE CMD? a Seen PART OF A COMMAND WAS LEFT 


?NUM TOO BIG? ™ VALUE re A NUMERIC ne ING dW.tde 
OR 177 ETAL: At? > 16 Bits BITS). 


"a" OR OR *'9" WAS TYPED WHEN AN OCTAL 
Aer ING as S EXPECTED, PROBABLY OCCURRED 
WHEN T DUMP” COMMAND WHERE 
OCTAL ADDRESSES ARE EXPECTED. 


?BAD RADIX? 
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?"LOOP** VALID ONLY IN ACTIVE? 


TO ACTIVE. 
POSSIBLE IF THE MODE OF 
ACTIV 


?"ECHO"’ VALID ONLY IN PASSIVE? THE **/ECHO"’ i WAS TYPED IN A 
R MODE WAS NOT SET 
TO PASSIVE. ECHOING OF RECEIVED DATA 
IS ONLY POSSIBLE IF THE MODE OF 
OPERATION IS PASSIVE. 


2ILL CHR- "'A-Z,0-9,SP,TAB'’ ONLY? A CHARACTER TYPED WITHIN QUOTES WHEN 
TRYING TO DEFINE THE CONTENTS OF A 
TRANSALT Expect ESSAGE WAS NOT 
A-2 ACE OR TAB’. RETYPE THE 
Command uit ONL Y THESE CHARACTERS 
BETWEEN tioTes 


2"'SIZE=0" NOT VALID? A_MESSAGE ZERO BYTES LONG CAN NOT BE 
“pitt: RETYPE THE COMMAND WiTH A 
/SI F_NO ''/SIZE="" IS TYPED 
A DEFAULT SIZE WILL BE USED. 
2TRANSMIT AND EXPECT LIST MUST BE IDENTICAL FOR LOOP? 
IF_RUN COMMAND WITH ‘‘/LOOP/CH’’ IS TYPED 
THE TRANSMIT LIST AND EXPECT LIST MUST 


BE EQUAL. IF THEY ARE NOT THIS ERROR 
WILL BE DISPLAYED. USE ‘SE E=T* COMMAND. 


3.2.2 DCLT OR DEVICE ERROR MESSAGES: 


CLOCK NOT FOUND 


L 
A “TICK 


BUT ANY 
ey ie 


ALSO, 
ZERO EVENT TIME FOR AL OGGeD. 


MAX. CHAR. MSG COUNT EXCEEDED - MSG. NOT BUILT !! 
THIS MEANS THAT THE TRANSMIT OR EXPECT 
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BUFFER FULL = MSG. NOT BUILT !! 


BUFFER_IS FULL. NO MORE MESSAGES CAN BE 
ADDED TO THAT BUFFER. 


MESSAGES CAN BE TO THAT BUFFER. 
THE LIMIT IS DETERMINED BY THE SIZE OF 
THE MESSAGE POINTER TABLE. 


CHAR. COUNT EXCEEDS BUFF LIMIT = MSG TRUNCATED 


3.2.3 DEVICE ERROR MESSAGE 


DATA COMPARISON DATA ERROR 
BYTE # IN MSG=XXX = EXPTD=YYY 


DATA COMPARISON DATA ERROR 
TOTAL MISMATCHES IN MSG = NNN 


DATA COMPARISON LENGTH ERROR 


THIS MEANS THAT THE LAST MESSAGE YOU 

TRIED TO ADD TO THE TRANSMIT OR EXPECT 

BUFFER e734 THE TOTAL CHAR. COUNT 
HAT BUFFER TO EXCEED THE LIMIT. 

SSAGE TRUNCATED TO COMPLETELY 

L_THE BUFFER. NO MORE MESSAGES C 

BE ADDED TO THAT BUFFER. 


RECVD=222 

XXX= OFFSET OF THAT BYTE FROM THE START 
THE COMPARE XPECT MESSAGE. 

YYY= THE CONTENTS OF THAT BYTE IN THE 


D MESSAGE 
222= THE CONTENTS OF THAT BYTE IN THE 
RECEIVED MESSAGE 


UP TO FIVE OF THESE ERRORS WILL BE 
PRINTED PER MESSAGE COMPARED. ONLY 
THE FiRst. FIVE AISMATCHES. WILL BE 


NUMBER OF 
BY ANOTHER ERROR. 


PRINTING THE EVENT LOG AND USING THE 
CLT DUR" COMMAND WILL ALLOW YOU TO 
FIND THE ADDRESS OF THE MESSAGE AND 
EXAMINE IT. 


THIS eae THAT WHEN THE 

peal yee rat COMPARED AGAINST THE 
MES WAS wecle D OF 
THE CHARS. WERE HE 


SEQ 20 
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COMPARE COUNT= XXX RECEIVE COUNT= 222 


XXX= we ue IN THE COMPARE 
222= NUMBER OF BYTES IN THE RECEIVED 
THIS MEANS THAT THE MESSAGE RECEIVED 


WAS _A DIFFENT LENGTH THEN THE MESSAGE 
THAT WAS EXPECTED. 


MODEM STATUS CHANGES FOR THIS PASS WERE.. 
HARD CHANGES=XXXXX = G! ITCHES=XXXXX 


gkeekeee 


WHERE XXXXX IS A 
IS Y 


WHERE THE 
DIFFERENCE IN THE MODEM STATUS. A 
GLITCH IS WHEN A oy sre y ‘man 


OCCURS BUT THE DP FIND 
DIFFERENCE IN STATUS BIT. 


* NOTE * = IN THE FOLLOWING ERROR DESCRIPTIONS XXXXX 


Terres? REFERS TO THE OCTAL 
SPECIFIE 


MASTER RESET DID_NOT WORK 

RXCSR TXCSR 

NO CLEAR TO SEND FROM MODEM 
RXCSR TXCSR 

TIME OUT WAITING FOR RX OR TX TO 
RXCSR TXCSR 


MODEM DID NOT RETURN MODEM READY 
RXCSR TXCSR 


AXXXAAK 

CRC_IN ERROR 

RDSR RXCSR 

XXXAXX AXXXAN 

RECEIVER OVERRUN 

RDSR RXCSR 
AXXAAKK 


TIMED OUT IN START,STACK ACK SEQ 


CONTENTS OF THE DEVICE REGISTERS 


WHEN REQUEST TO SEND SI 
IS SET MODEM DOES NOT RESPOND 
WITH CLEAR TO SEND 


COMPLETE 
THIS USUALLY MEANS AN OPEN 
COMMUNICATION LINK. 


pece Ives WASN'T SERVICED FAST 
ENOUGH(SOFTWARE) TO PREVENT 
A CHARACTER FROM BEING LOST. 


THIS USUALLY MEANS THAT THE DPV 





SEQ 21 
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CVCLHC.P11 
RDATA SDATA IS UNABLE TO ESTABLISH A 
XXXXXXX AXXXXAX CONNECTION WITH THE OTHER 
DEVICE BEING TESTED. SEE DDCMP 
SPEC. FOR EXPLANATION OF 
STARTUP SEQUENCE. 


4.0 PERFORMANCE AND PROGRESS REPORTS 


DCLT USES IT’S Out, Be THO FOR DETERMINING AN ‘END OF PASS*’ i 
WHICH 7 CALLED A ‘DCLT END OF PASS'’.. THE NUMBER OF 'DCLT PASSES 

TO BE RUN IS SPECIFIED BY THE PPASSEXXX SWITCH ON THE DCLT 

RUN COMMAND: HE TOT 7. T ERRORS" IS REPORTED 

WHEN *’ X NUMBER OF DCLT PASSES" ARE COMPLETED. 


4.1 PRINTING OF EVENT LOG 


LERCULAR @ EVENTS OR CHECK=POINTS WILL BE LOGGED IN 
RCULAR QUEUE’ STORAGE AREA rey ist EVENT LOG. THE LAST 


VEEVENTS ARE KEPT LOGGED TED ON THE OPERATORS 
CONSOLE BY, GIVING A, "PRINT DR>' “(DIAGNOSTIC SUPERVISOR) 
DCLT>" (DCLT) LEVEL. THIS WILL TAKE YOU TO THE RPT> LEVEL. NOW 

INPUT "LOG" COMMAND. THE EVENTS ARE PRINTEC IN A IDAST=IN 

FIRST-OUT"* ORDER. 


EVENT TIME IS TYPED OUT AS MMM:SS:TT (LIKE 254:36:07) WHERE MMM,SS,TT 
REPRESENT THE NUMBER OF MINUTES, S SECONDS CLOCK TICKS SINCE THE LAST 
START OR RES WAT THE MES ARE 


T D BE NOTED THAT 
RELATIVE SINCE tint’ THe PROCESSOR. 1S. RUNNING. AT "PRIORITY ? 
OCk CAN'T INTERRUPT TO KEEP TIME Tas 1s st 

ILE THE PROGRAM IS FETCHING DCLT C RATOR. 
IT SHOULD ALSO BE NOTED THAT THERE ARE 1 RGIS A wVALIA E 0, sTorE 
RELATIVE MINUTES SO "‘TIME’ WILL WRAP TO AFTER 256:59:5 
A START OR RESTART COMMAND AT THE “PRD” LEVEL INITJALIZES THE EVENT 
LOG. ORE JI 1s WISE J0_bO a SPRINT AT THE “DR>" LEVEL 
BEFORE GIVING A START’ OR “RESTART 


THE TYPES OF EVENTS KEPT IN THE EVENT LOG ARE: 


TRANSMIT MESSAGE QUEUED: 
EVENT TIME, ADDRESS OF 1ST BYTE OF MESSAGE 
OTAL NO. OF BYTES, MODEM STATUS AT THAT TIME. 


TRANSMIT MESSAGE COMPLETED: 
EVEN NT TIME ADDRESS OF 1ST BYTE OF MESSAGE 
OTAL NO. OF BYTES, MODEM STATUS AT THAT TIME. 


RECEIVE SPACE QUEUED: 
VENT TIME, ADDRESS OF 1ST BYTE OF SAGE 
OTAL NO. OF BYTES, MODEM S$ ATUSCA AT nt ime. 
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RECEIVE MESSAGE COMPLETED: 
EVENT TIME, ADDRESS OF 1ST BYTE OF MESSAGE 
TOTAL NO. OF BYTES, MODEM STATUS AT THAT TIME. 


DATA COMPARISON STARTED: 
EVENT TIME, ADDRESS OF 1ST BYTE OF RECEIVED MSG. 
TOTAL NO. OF BYTES IN RCV. MSG., TOTAL NO. OF BYTES 
IN EXPECT MSG. 


DATA COMPARISON DATA ERROR: 
EVENT TIME, ADDRESS OF 1ST BYTE OF RECEIVED MSG., 
TOTAL NO. OF BYTES IN RCV. MSG., TOTAL NO. OF 
COMPARISON FAILURES 


DATA COMPARISON LENGTH ERROR: 
EVENT TIME, ADDRESS OF 1ST BYTE OF RECEIVED MSG. 
TOTAL NO. OF BYTES IN RCV. MSG., TOTAL NO. OF BYTES 
IN EXPECT MSG. 


DEVICE INIT AND SETUP: 
EVENT TIME, MODE OF OPERATION, TYPE OF MAINTENANCE 
LOOP, 'DCLT’' PASS COUNT, "RUN” PARAMETERS 


DEVICE ERROR: 
EVENT TIME, DEVICE ERROR MESSAGE, CONTENTS OF TWO 
REGISTERS RELATING TO THE ERROR. 

END OF PASS: 

4c T: 


EVENT TIME, “DCLT’* PASS COUNT, "DCLT'’ ERROR COUNT, 
AND THE “'STRT=TO''(COUNT OF START TIME OUTS). 


SEQ 23 


. 
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4.2 OPERATOR STATUS MESSAGES 


bay "/STATUS, /NOSTATUS"’ Ae FOR i eth *'RUN’’ COMMAND 

NABLES/DI SABLES THE PRINTING OF PROGRAM STATUS MESSAGES TO THE 
OPERAT OR. E MESSAGES ARE INTENDED TO TELL THE OPERATOR WHAT 
THE DCLT PROGRAM IS CURRENTLY DOING. BELOW ARE THE MESSAGES THAT 
MIGHT BE PRINTED AND THEIR MEANING: 


MESSAGE MEANING 


TXQ DEVICE IS ABOUT START TRANSMITING A MESSAGE 
TXC TRANSMISSION OF MESSAGE COMPL 
RXQ DEVICE HAS QUEVED SPACE TO RECEIVE/ COMPLETED RECEIVE 


ABOUT TO D ODA 
CML LENGTH PRROR OCCURRED DURING DATA 
CMD ot nF peta DURING DATA COMPARISON 


NOTE:: BECAUSE THE DPV_IS AN INTERRUPT DRIVEN DEVICE, IT IS BEST 
TO DISABLE STATUS TO PREVENT OVERRUN ERRORS. (AT HIGH SPEEDS) 


ie 


M2 
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4.3 PRINTING DDCMP STATISTICAL AND ERROR LOG 
YOU ARE NR THIS PROGRAM WITH DDCMP PROTOCOL Ry a SS CAN 


IF 
EXAMINE (VIA "'RPT>"* COMMAND) DDCMP STATISTICAL AND ERR 
WHAT IS _HAPPENI 


GET ANGETTER UND RSTANDING OF ENING ON 
DESCRIPTION OF THESE COUNTERS SE oem. DATA COMMUNICATION MESSAGE 
PROTOCOL) SPECIFICATION VERSION 


BELOW IS A BRIEF DESCRIPTION OF EACH COUNTER. THE MOST IMPORTANT OF 
THESE ARE DATA MESSAGES SENT/RECEIVED AND DATA ERRORS IN/OUT. 


OCTAL # MESSAGE 


000000 STATUS FLAGS 
000000 DATA MSGS TX 


000000 DATA MSGS RX 


HIGHEST MSG TX 


HIGHEST MSG ACK 


NEXT MSG # TO TX 


LAST MSG # TX*ED 


HIGHEST MSG# RX 
TRIB ADDR 
REMOTE TIME OUTS 


GLOBAL CRC ERRORS 
NAK REASON 

SEL THRESH ERRS 
RX THRESH ERRS 


fags § 84 SF 0s Ht Fs oe 


TX THRESH ERRS 


MEANING 
USED ONLY IN SOFTWARE DEVELOPMENT. 


# MESSAGES TX'ED DURING THE TEST. RESET 
TO ZERO AT START OR RESTART. LATCHES AT -1. 


# MESSAGES RX°ED DURING THE TEST.RESET 
TO ZERO AT START OR RESTART. LATCHES AT 1. 


MODULO 255 COUNTER. HIGHEST MESSAGE # SENT 
AND ACK*ED BY REMOTE STATION. 


MODULO 255 COUNTER. HIGHEST MESSAGE # RX'D 
BY REMOTE NODE. (WITH NO ERRORS) 


MODULO 255 COUNTER. ALWAYS 1 i THEN 
CURRENT MESSAGE NUMBER BEING SENT 


MODULO 255 COUNTER. ALWAYS SAME AS HIGHEST 
# SENT. 


NUMBER OF LAST MESSAGE RX°ED AND ACK'ED. 
IF MULTIPOINT THEN ADDRESS THIS STATION. 


MODULO 255 COUNTER. REPLYS RECEIVED AND 
ACK'ED. 


IF MULTIPOINT NETWORK-CRC ERRORS DETECTED. 
REASON FOR SENDING LAST NAK 
HALF/DUPLEX ONLY. SELECT TIME OUTS. 
INCREMENTED WHEN _ DETECTED 

INCOMING MESSAGE. ( 0 8 COUN eR) 

RESET WHEN GOOD MESSA RECEIVED. 


INCREMENTED WHEN NAK RE itis time WHEN 
ACK RECEIVED. (MODULO 


ERS TO 
THE LINK. FOR A FULL 


SEQ 25 
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000 


3 


S 


SiG fe 


DATA ERRORS OUT NAKS _R seiveo BECAUSE OF HEADER CRC ERROR 
DATA CRC ERRORS OR MESSAGE NOT pecs iyeo 
a M euamcti INDICATES NOISE ON TRANSMIT 


DATA ERRORS IN NAKS SENT BECAUSE HEADER CRC ERROR OR DATA 
RROR DETECTED IN INCOMING MESSAGE. 
MESSAGE TAKING NOISE HITS. 


LOCAL BUFFER ERRS Hh NO BUFFER WAS AVAILABLE FOR INCOMING 
ESSAGE OR BUFFER THAT WAS AVAILABLE WAS 
700 SMALL FOR INCOMING MESSAGE. USUALLY A 
SOFTWARE SPEED PROBLEM. 


REMOTE BUFFER ERRS wie BUT BUFFER PROBLEMS AT REMOTE 


REMOTE STA ERRS RX OVERRUN wigs WASN'T SERVICED FAST 
ENOUGH) OR IF FORMAT ERROR A CRC EXISTED 
AND WASN'T DETECTED BY HARDWARE. 


LOCAL STA ERRS SAME AS REMOTE STATION ERRORS. 
TX / RX THRESH ERR ag tnd FROM RX OR TX THRESHOLD tga 


eoap at 4 A PERSISTENT LINK PROBLEM T 
T CORRECTED AFTER 7 RETRIES. 
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SEQ 27 


5.0 DEVICE INFORMATION TABLES 


THIS is THE per! a ans gd lag $ THE VALUES AND 

$I rte USED AS A ‘‘TEMPLATE’’ FOR CREATING ACTUAL P-TABLE 
ENTRIES AND THE DEFAULT VALUES PROVIDED FOR THE OPERATOR. 
SEE SECTION 2.4 FOR AN EXAMPLE OF THE HARDWARE QUESTIONS. 


THE NUMBERS IN BRACKETS ( I.E. (103) INDICATES THE OFFSET OF THE 
WORD INTO THE HARDWARE P-TABLE. THE OFFSETS MUST MATCH THE P-TABLE 
OFFSETS USED _IN THE HARDWARE PARAMETER CODING SECTION WHERE THE 
"GET PARAMETER’’ CALLS ARE USED TO FILL THE P-TABLE. 


8 FULL OR HALF DUPLEX FLAG (8]TO=1 IF FULL) 


° 1 3 

eWORD 160170 3 CSR ADD 

eWORD 300 3:04] INTERRUPT VECTOR 

eWORD 240 306 

WORD 9 3€10] PT-PT =O MULTIPOINT = 1 
WORD 301 TRIB ADDRESS THIS, STATION 
-WORD 0 3€14] REMOTE NODE ‘ITEP’ 


6.0 MODE AND MESSAGE DESCRIPTIONS 


6.1 MODE DESCRIPTIONS 


THE A MODE be gt ger REFER TO MESSAGE LISTS BEING 
tee HH TED AND RECIEVED. BE AWARE THAT OTHER DATA IS ALSO 
SENT WITH THE MESSAGE. ALL MESSAGES ARE rep nee D BY SYNC 
CHARACTERS (ITEP = 026) (PROTOCOL = 226). P MESSAGES CONTAIN 
NO CRC CHARACTERS. NON-ITEP MESSAGES ARE TINCLOSED IN A_DDCMP 

1 TR BU Ae age ENABLED CONTROL MESSAGES(ACK,NAK,..) 


6.1.1 TRANSMIT MODE 


A LIST OF MESSAGES IS TRANSMITTED WITHOUT EXPECTING ANY DATA 
TO BE RECEIVED. 


6.1.2 RECEIVE MODE 


SPACE IS QUEUVED FOR THE DEVICE TO RECE! 
AFTER RECEIVING AN “EXPECTED'’ NUMBER OF 
CAN BE COMPARED AGAINST A LIST OF "EXPEC 


E THE DATA RECEIVED 
IF DATA=CHECKING IS ENABLED. 


AGES: 
RECEIVE MESSAGES 
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SEQ 28 


6.1.3 PASSIVE MODE 


THEN EVERY TIME A MESSAGE IS wecervee A MESSAGE IS TRANSMITTED. 
DATA CHECKING CAN BE DONE ON THE RECEIVED DATA.THE ‘'/ECHO, /NOE CHO" 
ENABLES/DISABLES THE RETRANSM! SION OF THE DATA RECEIVED. 


6.1.4 ACTIVE MODE 


A_LIST OF MESSAGES ae Mp AA AND of arevice te rae BATA 

AFTER RECEIVING AN were HE DATA RECEIVED 
CAN BE COMPARED AGA INST” A CIST OF Expect. 6 O RECEIVE MESSAGES 
IF DATA=CHECKING is; ENABLED. 


NOTE: IF BOTH ENDS OF THE LINK 4 IN ACTIVE le THEN THE 
LINK MUST BE A FULL DUPLEX LINK 


6.1.5 DOWN-LINE-LOAD 


DOWN-LINE=LOADING IS NOT SUPPORTED FOR DPV-11 TO DPV-11 LINKS. 


6.1.6 TALK MODE 





HE "TALK END, OF THE LINK TRANSMITS OPERATOR-TYPED MESSAGES 
UNTIL A “EXIT’* MES SAGE. IS TYPED. AT THAT POINT, T 
INTO “LISTEN” MODE. AN EXIT ESSA MES 
FOUR CHARACTERS ARE "EXIT. SINCE ONLY THE FIRST FOUR CHARACTE 
NEED TO BE EXIT’, MORE CHARACTERS CAN BE ADDED SO THAT A MESSAGE 
MAY BE SENT AND THE MODE SWITCHED ALL AT ONCE. FOR EXAMPLE: 


TLK> EXIT ALL OF THIS LINE IS SENT THEN MODE SWTICHED 


6.1.7 LISTEN MODE 


"LISTEN" END OF THE LINK PRINTS ALL OF SAGES 
RECEIVED BY THE DEVICE ON THE OPERATOR'S CON SOLE IF THE MESSAGE 
VED 1S AN “EXIT” MESSAGE, THEN THE NODE SENTERS "TALK MODE, 
IT MESSAGE" 1S A'RESSAGE UHOSE FIRST FOUR CHARACTERS ARE "EXIT". 


6.1.8 MAINTENANCE “LOOP’* MODES 


CVCLHC_DPV=11_ 
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REMEMBER THAT | Bret A_‘'RUN’’ COMMAND IS TYPED 
NO LOOPBACK 


LOOP MODE MUST BE SPECIFIED BY A 


TPA LOOP. MODE 15 DESIRED. 
LOOP MODES ARE ONLY VALID IF THE MODE TO RUN IS ACTIVE ! 


INTERNALTTL 


LOOPS DATA INTERNAL TO THE USYNRT 


THE, DEFAULT JS 


THE FOLLOWING TABLE SUMMARIZES THE MODES THAT CAN BE RUN TOGETHER 
WhEN THE DCLT oe 1S RUNNING ON TWO PROCESSORS (ONE AT EACH 


END OF THE LINK 














'STATION A STATION B 
‘HOST NODE ‘*/LOOP" ALLOWED? "REMOTE'’ NODE DUPLEX 
iTALK NO LISTEN®, RECEIVE HALF OR FULL! 
iLISTEN NO TALK* SMIT HALF OR FULL! 
iT NO RECEIVE®, LISTEN HALF OR FULL! 
iRECEIVE NO TRANSMIT#®, TALK HALF OR FULL! 
iPASSI NO ACTIVE* HALF OR FULL! 
\ACTIVE ES ACTIVE* 

LACTIVE YES PASSIVE* HALF OR FULL! 


i DOWNLINELOAD #* DOWN-LINE-LOADING IS a | SUPPORTED FOR DPV-11 ! 
; 0 DPV-11 1 LINKS. : 








*= MOST LIKELY TO BE IN THAT MODE 








NOTE: H/D START COLUMN INDICATES WHICH NODE TO START FIRST ON A 
HALF DUPLEX LINK 


if —- IS SELECTED THE HALF DUPLEX START COLUMN CAN BE 


SEQ 29 
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6.2 MESSAGE DESCRIPTIONS 


NAME DESCRIPTION 
ZEROES MESSAGE OF ALL 0°S ( 5 ail 
ONES MESSAGE OF ALL 8 coon OYE TTT 2233 
Oat ness SAGE OF ALTERNATING 17S (10101010. 11010100 +=} 
CCITT Tf Si 2eBIT (vs. 3118 BITS) TEST “PATTERN ae 
Li Se a oe ale 
LAZY <IPo<A7PSZ8A THE QUICK GROW FOX, UWerD >) 
ALPHA A-NUMERICS (OR FUTURE conn MSG) 
rey (AMPERSAND) ' () #+ .=.0123456789: ; <=>?7@ABCDEF GHIJK 
LMNOPORSTUVWXYZ/L\)*_%5 
OPERATOR=SPECIFIED wAcl 0-9, SPACES, TABS" 
ESE ARE THAT THE CHARACTERS THAT CAN 


TYPED BETWEEN QUOTATION MARKS (°'..°') 
TO SPECIFIY A UNIQUE MESSAGE. 


SEQ 30 
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SEQ 31 


7.0 OTHER INFORMATION 


7.1 INTERFACING TO AN “‘ITEP*’ NODE 


THESE ARE THE RULES WHEN USING ITEP/WITH A DUP TO TALK 
TO A DPV USING DCLT. 





ITEP NODE DCLT NODE 
ANSWER ALL QUESTION TO THE ANSWER ALL QUESTIONS TO THE 
SET SWITCHES PROMPT. DCLT> PROMPT. 


RERARAAAARAAAAERERRERERERERERERERRARRARAREEEAERERARERRERERRRRREE 


FOR ONE WAY OUT.. 
SET SWITCHES TO 1221 CLEAR EXPECTED 

SET E=ITEP/S=56 

RUN MODE=REC/STATUS/CHECK/NPR 
NOTE: DUP ITEP SENDS ONLY 56 CHARS 
PeewerTTTeTETTITTITITTITITITiTiiiitiitiiiitiiiiiiiiiiiiiiiiiii 
FOR ONE WAY B.esee 
SET SWITCHES TO ....1222 RUN MODE=TRA/STATUS/NPR 
RARAAAAAAAARARAAEAAAAAARARARARAEARARAARAEEERERERARAARARARAARARE 
FOR EXTERNAL LOOPBACK.... 
SET SWITCHES.......12246 CLEAR EXPECT ED 

SET EXP=1TEP/S=56 

RUN RE AET IVE, STATUS/CHECK/NPR 
RAESAAAAAARARAEAEAAERAAARAAAAAAARAAERAAAEEEERERAEAEAAARARARERERAEEE 
FOR INTERNAL LOOPBACK...... 
SET SWTICHES......1260 cL AR EXPECTED 

SET EXP=ITEP/S=56 

RUN MODE=ACTIVE/STATUS/CHECK/NPR 

SESAAAAAAAAAAAAAEAARAAARARERAAAERAERAERARAEEEEEAAEAERERARAARARAER 


NOTE: DO = a 56, 0¢ WITH i soins ye TO DCLT 
THE ONL 
TE “ERRORS WHEN Rec BATA’ FROM ITEP 
BE Riis ® a, 


REMEMBE 1, Ane ConA EGaTans WITH AN “‘ITEP’’ NODE 
ALUAYS DISABLE TOCOL*) 
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7.2 TROUBLESHOOTING HINTS 


THESE ARE BY NO MEANS THE at! WAY s DCLT ibe USED fiiiit! 
DCLT IS MEANT TO BE A VERY FLEXIBLE TOOL! THIS SECTION IS MEANT TO 
GIVE SOMEONE NOT TOO FAMILIAR WITH DCLT A PLACE TO START. 


EVEN IF YOU ARE CHECKING OUT DPV TO DPV LINKS Hi IS A GOOD IDEA 
0 ENABLE PROTOCOL. BY EXAMINING THE DDCMP STATIST 
Lose YOU CAN GET A BETTER PICTURE OF WHAT IS HAPPENING ON THE LINK. 


REMEMBER THAT THE AS whey OF STATUS MESSAGES AND PRINTING OF THE 
EVENT LOG CAN PROVIDE A LOT OF INFORMATION ABOUT THE SEQUENCE OF 
EVENTS AND HOW THE DEVICE AND LINK ARE BEHAVING. 


NOTE: IF BOTH NODES IN ACTIVE AND "‘/NOCHECK’’ IS USED, 
~-=== END-OF=PASS IS DEFINED AS AS RECEIVING 1 MESSAGE 
AND COMPLETING THE TRANSAIT LIST. WITH NO DATA 
CHECKING THERE IS NO WAY FOR DCLT TO KNOW 
MESSAGES IT SHOULD EXPECT TO RECEIVE. 


7.2.1 INTERNAL LOOP AT EACH NODE 
RUN EACH END OF THE LINK IN ACTIVE MODE WITH LOOP=INTERNAL. 
TRANSMIT TWO THREE MESSAGES WITH 4 DATA_CHECKING. 
STATUS PRINTING COULD BE TURNED OFF IF ON, BUT SEEING THE SEQUENCE 
OF EVENTS MIGHT BE INFORMATIVE. 
A POSSIBLE COMMMAND SEQUENCE IS: 

Cc 


C 
SE_T=ONES/S=20/C=2 
R M=A/LO=1/NOCH/STAT 


WHAT THE ABOVE COMMAND SEQUENCE MEANS: 
THE “C E°* AND THE °C r ITAA TES I a 3 “EXPECT 


LIST AND THE “TRANSMIT LIST cone s/$220/¢02" 

SETS THE TRANSMIT LIST TO CONTAIN 3h MES MESSAGES 
CONTAIN DATA OF ALL ONES +e FA Oayres IN LENCTH, 
THE 'R M=A/LO=I/NOCH/STAT’ SETS T ope 0 BE 
ACTIVE AND LOOP TYPE 0 BE INTERNAL | TTL THE PROGR, WILL 
NOT CHECKING DATA SO THERE WA NEED TO SET UP AN 


THE PROGRAM WILL BE Ss PRINTING STATUS MESSAGES. 


T YOU SHOULD SEE AF Ha NTERING THE RUN COMMAND 
ti THINGS ARE RUNNING C CTLY : 


NI RXQ TXQ RXQ TXC TXO RXQ TXC 
MQ RXQ TXC . 
MODE =ACT I VE/LOOP= INTERNAL /PASS=00000 





SEQ 32 
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/STATUS/NO “HE CK/NOE CHO/NOMODEM/NOPROTOCOL 
DCLT> (A) ? 


THIS aves YOU _A_IDEA_IF THE COMM. DEVICE CAN E 
RECEIVE. ANY ERRORS REPORTED WILL Mia TO INCORRECT 
apie ADDRESSES 8 BEING USED OR A FAULTY D HECK eed 
ae RUN THE PREREQUISITE D S$ FOR THE COMM 


NOW TRY RUNNING EACH NODE THE SAME WAY WITH DATA CHECKING ENABLED. 
A POSSIBLE COMMMAND SEQUENCE IS: 


SE E=T 
R M=A/LO=1/CH/PAS=3 


WHAT THIS SEQUENCE MEANS: 


THIS wis IS SIMILAR oy ONE ABOVE . T 
MAKES A COPY OF THE TRANSMIT LIST 

THE EXPECT LIST NOW ye ws MES ae 

HAVE ONES co ne 


THE RUN COMMAND 1S 
SWITCHES ‘'/CH/PAS= Tey 
TO CHECK THE RECEIVED DATA AGAINST. THE 
THE 'PAS=3"" SWITCH TELLS THE PROGRAM T 
RETURNING TO THE DCLT> PROMPT. 


T YOU SHOULD SEE AFTER Seren ins THE RUN COMMAND 
ats THINGS ARE RUNNING CORRECTL 


INI RXQ TXOQ TXC RXQ TXO TXC RXOQ 
TX TXC CMP OP RXQ TXQ 
Te ee ee Os oe ee I Po 


CMP TX TXC RXQ TXO 
TXC RXQ TXQ TXC CMP CMP CMP EOP 
MODE=ACT I VE/LOOP= INTERNAL /PASS=00000 
/STATUS/CHE CK/NOE CHO/NOMODEM/NOPROTOCOL 


es kerk er etine Fre eg A 1s AVAILABLE wistttts Rs-425) Ov e. yA END OF 
FOIE CTOR ei? AVAILABLE” INSTALL FALL 17 AND RUN RUN IN AC Ar MODE rit THE 


pOssieL BLE COMMAND SEQUENCE IS: 
R M=A/L=C/CH/PAS=3 
WHAT THIS SEQUENCE MEANS: 


ras SEQUENCE HAS THE *‘/LO=C**, THIS INFORMS “ SOF TWARE 
NOT TO CHECK FOR DATA SET READY SI FROM THE MODEM. 


I 3 
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SEQ 34 


T YOU SHOULD SEE AFTER Sarenins THE RUN COMMAND 
ee THINGS ARE RUNNING CORRECT 


INI RXQ TXQ TXC RXQ TXQ TXC RXQ 
TXQ TXC CMP CMP CMP EOP RXQ TXQ 
Ixt RXQ TXQ TXC se TXQ TXC CMP 
CMP CMP EOP RX@ TXQ TXC RXQ TXO 
TXC RXQ TXQ TXC CMP CMP CMP EOP 
MODE=ACTIVE/LOOP=CABLE/PASS=00000 
OCLT> (A)? /STAT PUS/CHECK/NOE CHO/NOMODEM/NOPROTOCOL 


7.2.2 TRANSMIT ON ONE NODE RECEIVE ON THE OTHER 


NOW TRY TRANSMIITING FROM ONE END AND RECEIVING ON THE 
OTHER. MAYBE WITH NO DATA CHECKING AT FIRST TO ESTABLISH 
IF THE LINK IS WORKING. POSSIBLE COMMAND SEQUENCES ARE: 


NODE A NODE 8 

ce CE 

cT ct 
SE_T=1ALT/S=250 R M=R/NOCH/PAS=3 
R M=TR/PAS=3 


WHAT THIS SEQUENCE MEANS: 


THE **C ye, ** AND “°C T** INITIALIZE BOTH THE 
I EXPECT LISTS. THE at Lk 54 


SETS THE TRANS TO BE 1 ME 
WITH A LENGTH OF 250 BYTES AND TA OF rs tie nN MODE 
ONES ZEROS. THE 'R RTR/PAS= “SETS THE RUN 
NODE A TO BE Law T PASS COUNT IS SET TO 
THE "R M=R/NOCH/PAS= T RUN MODE OF NODE 8 
TO BE RECEIVE, NO DATA CHECKING IS TO BE DONE,AND 

THE PASS COUNT IS SET TO THREE. 


YOU SHOULD SEE AFTER CATERING THE RUN COMMAND 
e THINGS ARE RUNNING CORRECTLY 


FOR NODE A: 
a Ts TXQ TXC EOP TXQ TXC EOP TX@ 
ORODE=TRANSMIT/ PASS=00000 
oar ww ? /STATUS/NOCHE CK/NOE CHO/NOMODEM/NOPROTOCOL 


FOR NODE B 
INI RXQ EOP RXO 
SRECEIVE PASS 


DCLT> (A) ? 


PPASS= 
TATUS/NOCHE CK/NOE CHO/NOMODEM/NOPROTOCOL 





J 3 
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CVCLHC.P11 
NOW TRY DOING DATA CHECKING ON THE MESSAGE(S) BEING 
TRANSMITTED. POSSIBLE COMMAND SEQUENCES ARE: 
SE_E=1ALT/S=250 H 

R M=TR/PAS=3 R M=R/CH/PAS=3 

WHAT 1dIS SEQUENCE MEANS 
THE *'SE UE TALT/S250" LINE. re BE ADDED HERE 
TO SET ay List ON THE RECEIVE NODE 
so. IT itt "iow Una 10 ARE “ 


NST. 
THE CHANGE IN THE RUN COMMAND I$ FROM ‘NOCH’ TO 
CH’. THE ‘‘CH’’ ENABLES DATA CHECKING. 


WHAT YOU SHOULD SEE AFTER ENTERING THE RUN COMMAND IF THINGS 
ARE RUNNING CORRECTLY: 


NODE A: IS THE SAME AS ABOVE. 


B: 
INI RXQ CMP 7h =” EOP RXQ CMP EOP 
MODE=RECE IVE /P. 
OEE (IS CHE CK/NOECHO/NOMODEM/NOPROTOCOL 
DCLT> (A)? 


RUN THRU THE SEQUENCE AGAIN WITH NODE A RECEIVING 
NODE B ae: We TO CHECK OUT THE OPPOSITE 
IRECTION OF DATA FLOW. 


7.2.3 ONE NODE ACTIVE THE OTHER NODE PASSIVE 
NOW TRY RUNNING ONE NODE IN ACTIVE MODE WHILE THE OTHER 
END RUNS IN PASSIVE. DATA CHECKING SHOULD BE TURNED OFF 
IF THE MESSAGE LISTS ARE NOT THE SAME. 
POSSIBLE COMPAND SEQUENCES ARE: 

NODE A eS 

3 C 
y Bi SU gl Arg Se TSTALT/S=20/ =2 

3 R M=P/NOCH/PAS 
WHAT hee a 
exe 10N OF e was a A $ THE FOLLOW! 


Wits Erte Ay ¥ hie rhe oa "Uist 


He PATTERN. T 
at es: ts pb 


"FROM toad TIME YOU WOULD HA 
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TO ADD A ‘‘/STA TO THE RUN COMMAND LINE. 


NODE 8: THE ert AND EXPECT LISTS ARE INTIALIZED 
THEN THE TRANSMIT LIST IS SET TO 35 MESSAGES OF 
BYTES en : THE. DATA_FOR EACH MESSAGE IS ALTERNATING 
*S AND NOD THEN RUN IN PASSIVE mee WITH 
DATA CHECKING DISABLED AND THE PASS COUNT SET TO 3. 


T YOU SHOULD SEE AFTER ENTERING THE RIN COMMAND 
e THINGS ARE RUNNING CORRECTLY 


FOR NODE A: 


INI RXQ TXQ TXC RXQ TXQ TXC RXOQ 
TxQ TXC EOP RX@ TXQ TXC RXQ TX 
TXC RXQ TX TXC ro one TXQ TXC 


RXQ TXQ TXC RXO 
MODESACTIVE/PASS= 
/STATUS/NOCHE CK/NOE CHO/NOMODEM/NOPROTOCOL 
DCLT> (A) ? 


FOR NODE B: 
INI RXQ TXO ims RXQ TX@ TXC RXQ 
TXQ TXC EOP RXQ TXQ TXC RXQ TXO 
TXC EOP RXQ TXQ TXC RXQ TXO TXC 
RxX@ TXQ TXC EOP 
MODE=PASS1VE/PASS=00000 

/STATUS/NOCHE CK/NOE CH’! /NOMODEM/NOPROTOCOL 
DCLT> (A) ? 


NOW USE DATA CHECKING WITH THE “EXPECT MESSAGE LISTS*’ SET 
UP APPROPRIATELY. ANOTHER VARIATION IS TO HAVE LARGE SIZE 
MESSAGES ON ONE SIDE WITH SMALL MESSAGES ON THE OTHER. 


THEN REVERSE THE SETUP SO THAT THE NODE RUNNING IN ACTIVE 
IS RUNNING IN PASSIVE AND VICE VERSA. 


7.2.4 BOTH NODES ACTIVE 


NOW BOTH NODES CAN BE RUN_IN ACTIVE i Me DATA CHECKING ON 
a Ae laa COULD BE TURNED OFF IF YOU'RE NO 


PHA/S 
=ZERO/S= 
=0NES/S= 
=ITEP/S= 
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R M=A/CH/NOST/PAS=3 R M=A/CH/NOST/PAS=3 


WHAT a seeenst MEANS : 
A SETS UP IS a ae ae LIST 
ESSAGES, ea ee ah $ 10 artes LONG AND 


ONG ATA. MESSAGE 
BYTES LONG AND CONTAING ie hd 4 — 


T 

AND VICE VERSA 

BOTH NODES ARE RUN IN THE ACTIVE MODE WITH 
DATA CHECKING AND PASS COUNT EQUAL TO THREE. 


YOU SHOULD SEE AFTER ae THE RUN COMMAND 
IF THINGS ARE RUNNING CORRECTL 


ON BOTH NODES A AND B: 
MODE=ACTIVE/PASS=00000 
‘eat 0028 7NOSTATUS/ CHE CK/NOE CHO/NOMODEM/NOPROTOCOL 


A GOOD VARIATION THAT COULD BE TRIED is TO LOAD _THE TRANSMIT LIST 
AND tae LIST WITH A GE MESSAGE ( Be SIPC TERS) ELE PROTOCOL 
AND RUN MANY PASSES. SET BOTH ENDS THE SAME 


DCLT> (A) 2? CLT 


DCLT> (A) ? CL E 
DCLT> A ? SE FaECaTT/Sizeaste 
DCLT> (A) ? SE E=T 


DCLT> (a3 ? R M=A/PA=255/PR/CH/NST 


7.2.5 TALK AND LISTEN MODES FOR COMMUNICATING 


TALK AND LISTEN MODES ARE ry F THE OPERATORS WISH TO COMMUNICATE 
WITH maT OTHER. wb th SETUP A me I rnAt ACH WIL 2, TO ye, HL MODE, 
TALK OR LISTEN AND SEND MESSAGE LINK. BLE COMMAND 
ARE. 
R _M=LIS/NOST R M=TA/NOST 
LIS> TLK> 


7.3 EXAMPLES OF COMMANDS 


THIS SECTION WILL SHOW A SAMPLING OF COMMANDS AND 
EXACTLY WHAT TO EXPECT FROM THEM. 


7.3.1 EXAMPLES OF MESSAGES COMMANDS 


LU 
. SEQ 38 
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THE CLEAR COMMANDS . 


CE 
cT 


THIS WILL SAGE OF S88 THE TRANSMIT AND EXPECT LIST 

TO 1 MESSA BYTES. THE DATA OF THE MESSAGE WILL 
BE THE ITEP MESSA 

IF nen See ARE FOLLOWED BY A SHOW COMMAND 

SUCH AS THE SHOW EXPECT yes YOU WOULD SEE IS 


DCLT> (A) ? 
NOW IF YOU pre 8 T EXPECT LIST COMMAND SUCH AS: 


AND oes 1 IT WITH A SHOW EXPECT LIST COMMAND 
WHAT YOU woe SEE IS 


MSG: TYPESALPHA/SIZE= 
MODE=A =ACTIVE/PASS= =00001 

NOS TATUS/ CHE CK/NOE CHO/NOMODEM/NOPROTOCOL 
DCLT> (A) ? 

7.3.2 EXAMPLES STATISTICAL COMMANDS 

IF you TYPE A HELP COMMMAND 

WHAT You WILL SEE IS 

CLEAR OR SHOW EXPECTLIST OR TRANSMITLIST 


DUMP START-END/8 
set oa sds + RM OR TOG TEST WE /S1 Zee OR /COPY=N 


TYPE=ON maa a “ALT OAL T ITED .¢ CCITT TT ALPHA 
Poppet THE/CHEcReROTOCOL- STATUS, ECHO. MODEN.PASS 


n NODEATYP/ ACT, PAS, TAL 
LTYP=INT, the. Coc ,REM/ 
DCLT> (A) ? 
THE SAME WILL HAPPEN IF YOU USE THE ? 
THE DUMP oimaiceosttSboh ne THIS 
THIS WILL DUMP THE DATA EROW ADDRESSES 41260 10 


IN THE FOLLOWING MANNER 


n 3 
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$1668 1064¢3 000167 177772 021122 012112 006312 006312 006312 


IF YOU a? ita ee OR ie 


WHAT YOU 


sy Heh fa RE HE 


7.3.3 EXAMPLES RUN COMMMANDS 


rey CAN FIND SEVERAL EXAMPLES OF THE RUN COMMMAND IN THE 
TROUBLE SHOOTING HINTS SECTION 3UT HERE ARE SOME OTHERS. 


IF YOU ay TO EXECUTE THE RUN COMMAND 
M=TR/NOST/CH/PAS=4 
WHAT woul HAPPEN IS AFTER 4 PASSES THE PROGRAM WOULD RETURN 
TO THE DCLT PROMPT AND PRINT 
MODE=TRANSMIT/PASS=00000 
/NOS TATUS/ CHE CK/NOE CHO/NOMODEM/NOPROTOCOL 
, DCLT> (A) ? 


F YOU a TO EXECUTE THE RUN COMMAND 
Cc 
R M=A/LO=1/ST/CH/PAS=3/PR 
WHAT YOU WOULD SEE (IF USING DEFAULT TRANSMIT AND EXPECT 
MESSAGES) IS 
INI RXQ TXO TXC 4 A ue Tx@ 
TXC CMP EOP RXO CMP EOP 
MODESACTIVE/LOOP= INTERNAL? /PASS=0000 
/STATUS/CHE CK/NOE CHO/NOMODEM/PROTOCOL 
DCLT> (A) ? 
IF YOU 37 aed EXIT COMMAND 
WHAT voy ee SEE IS 
0 CUMLATIVE ERRORS 
DR> 


— cor PRINT COMMANDS 


Arne 8 are 


REPORT on ei THER hi The eto OR DR> THE 
A Ten Ng 
TYPE *H"* e "7°" FOR : 
RPT> (A) —_ 


HERE ARE SOME EXAMPLES OF RPT> LEVEL COMMANDS: 





SEQ 39 
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THE HELP OR ? COMMAND 
HELP 


SEQ 40 


? 
PRODUCES THE FOLLOWING: 
DCLT REPORT CMDS: 
LOG = PRINT DCLT EVENT LOG 
T LEVEL 

HIS Mie y 
COUNTER/SW = PRINT DDCMP COUNTERS 
WHERE /SW=FULL, /ERRORS, /OFFSET=NN(O) 
RPT> (A) ? LOG 
THE LOG COMMAND PRODUCES THE FOLLOWING 
>>> Bey EVENT om ENTRY >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> 


PASS = {2 ERRORS = 0 —_STRT-TO = 0 
>>> DCLT “EVENT LOG OENTRY >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> 
TRANSMIT MS 


G 
ADDR OF msG=003150 BYTE COUNT= 58 
MODEM STATUS: CTS DSR DCD RTS RI SQD TM 


>>> DCLT CYENT | LOG ENTRY >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> 
0:01:16 RECEIVE SPACE QUEUED 
150 BYTE COUNT= 512 
MODEM STATUS: CTS DSR DCD RTS RI SQD T™ 
S- 8 G08 8.28 


THIS GOES ON FOR _45 EVENTS IF THE MODE 
and EXECUTED HAD THAT 
YOU EXIT FROM EVENT LOG PRINTING BY 
TYPING A CON NTROL C. 


TO LEAVE THE REPORT LEVEL INPUT THE ‘EXIT’* COMMAND. 


7.3.5 EXAMPLE EXIT COMMAND 
THE EXIT COMMAND WORKS LIKE THIS. IF YOU 
ENTERED THE REPORT LEVEL FROM THE SUPERVISOR 
(DR>) THEN TYPING 

EXIT 
WILL RETURN YOU TO THE SUPERVISOR. 

DR> 


IF voy Bad REPORT FROM THE DCLT LEVEL 
THEN TYPING 
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SEQ 41 


EXIT 
WILL RETURN YOU TO THE DCLT LEVEL. 
DCLT> : 
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SEQ 42 


7.4 THINGS TO WATCH OUT FOR 


IF YOU ARE sept DCLT ON SYSTEMS THAT HAVE CONSOLES 

pre DIFFERENT SPEEDS YOU WILL BE UNABLE TO USE THE 
ae eroie FEATURE IN CERTAIN MODES. THE RULE IS 

IF IT DOESNT WORK WITH STATUS PRINTING RUN THE MODE 

WITH NOSTATUS. 


THAT THE TRANSMIT L N WITH 
RECEIVE LIST WHEN eet THE ECHO SWITCH. ALSO DISABLE 
DATACHECKING(* /NOCHECK*). 


BEWARE THAT THIS DCLT WILL NOT RUN THE DPV11 A 
HIGH CLOCK SPEED OF SOKHZ SINCE THE SOFTWARE I 
ABLE TO KEEP UP WITH THIS SPEED. 


F/wanooER RUNNING HALF=DUPLEX IT IS BEST TO USE THE 
SWITCH BECAUSE EVERY TIME THE LINE IS TURNED- 
MODEM CHANGE WILL BE REPORTED. 


T ITS 
S NOT 
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1369 
194 


— 


002000 


Sees eTEE? 


00 
win 
WHO 


eee ee ee ed ed ced ee ed ed ed eed ed eed os ed 


SERESSRFRESSSSISS 


e™S2ses8 = & S88srexe 


BSAVAAS 


kd ed td ad od ot 
SSSSS8 


ooo 


SSSSSSSESSSRERES 


me et ek ed ak ed ed ed ed ed td ed 
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-SBTTL PROGRAM HEADER 
BGNMOD 


3+t 
3 THE PROGRAM HEADER IS THE INTERFACE BETWEEN 
3 THE DIAGNOSTIC PROGRAM AND THE SUPERVISOR. 


POINTER BGNRPT ,BGNAU,BGNDU 


HEADER CVCLH,C,0,1800. .0,4PRI07 


LSNAME : : 

ASCII /C/ 

ASCII /V/ 

ASCII /C/ 

ASCII /L/ 

ASCII /H/ 

BYTE 

BYTE 

BYTE 
LSREV:: 

ASCII /C/ 
LSDEPO: : 

ASCII /0/ 
LSUNIT:: e 
LSTIML:: 

- 1800. 
LSHPCP: : 


LSSPCP::° 


LSDTYP::° 
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1937 gos0se (78m sap: “MOR? ° 
505036 000000 “" woRD 0 
1399 905026 LSDTP:: 
500 003040 002124 .WORD LSDISPATCH 
5001 p02¢ sen LSPRIO:: cell sual 
DC 0020 000 . 
Nt) nM) >C LSENVI:: 
‘ te 000000 0 
nt N05 LSEXP1:: 
00 003066 000000 «WORD 0 
fi oat LSMREV:: TE CSREVISION 
509 0050 On “BYTE CSEDIT 
010 00205 , LSEF:: 
011 0020 900000 «WORD 9 
01 MY >0 eWORD 
ag ot é , LSSPC:: 0 
443 002060 LSDEVP:: 
b0206 .WORD LSDVTYP 
6 02060 011526 pumas 
018 ists 025334 vsexpo::MOR?LSRPT 
1 b050ee 000000 worD 0 
5021 D0zt 66 LSEXPS: : . 
434 2 ' 70 LSAUT 33 
60¢ D02¢ 9 026332 WORD LSAU 
‘ HO AL LSDUT:: 
2026 d02C 026324 ened «WORD LSDU 
+¥ poseee 000000 ees .woRD 0 
+53: OAL LSDESP:: 
30 00207 011536 meme LSDESC 
032 002100 104035 EMT ESLOAD 
2035 OC 1 LSETP:: 
3% 902102 000000 eR eed 
03% «OC 1 025350 seeatins «WORD LSINIT 
2038 90210 026236 sete -WORD LSCLEAN 
iC ’ bgt 026234 LSPRT:: WORD LSAUTO 
ud 00¢ 025342 saan «WORD LSPROT 
st bugt14 000000 eae -WORD 0 
Soran ** word 0 
me? 909120 LSHIME:: 
20 021 000000 -WORD 0 
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1 
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124 
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000001 
026340 
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»SBTTL DISPATCH TABLE 


” THE DISPATCH TABLE CONTAINS THE STARTING ADDRESS OF EACH TEST. 
: : IT IS USED BY THE SUPERVISOR TO DISPATCH TO EACH TEST. 


DISPATCH 1 


-WOR,) 
LSDISPATCH:: 
WORD TI 





SEQ 45 
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Bw WA oS eB LANK TEST 


002130 000001 
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~SBTTL DEFAULT HARDWARE P-TABLE 


SEQ 46 


+ 

THE DEFAULT HARDWARE P=TABLE CONTAINS DEFAULT VALUES OF 
THE TEST=DEVICE PARAMETERS. s eA ad OF pe TABLE 
IS IDENTICAL TO AL: 3 STRUCTURE OF THE HARDWARE P=-TABLES, 
AND IS USED AS A ‘‘TEMPLATE’’ FOR BUILDING THE P-TABLES. 


BGNHW = DFPTBL 
«WORD 110000-LSHW/2 


LSHW:: 
DFPTBL:: 


seers SECTION 
THE NUMBERS IN BRACKETS ARE THE OFFSET VALUES USED IN THE PARAMETER 
; CODING SECTION. 


1 3COJ FULL OR HALF DUPLEX FLAG (681TO=1 IF FULL) 


sDEVICE DEPENDENT SECTION 


; ADDING OR REMOVING WORDS FROM THIS TABLE EFFECTS Me sever CALLS IN 
: THE HARDWARE PARAMTER CODING SECTION BY CHANGING ‘OFFSE 

- WORD 170 fe 

- WORD ite al VECTOR 

- WORD 4 306 

- WORD 3 He Ts MULTIPOINT = 1 

- WORD 3 TRIB aDones§ Tees. STATION 

«WORD : eG at ‘ITE 

- WORD 2 

ENDHW 


110000: 


ONTAINS PROGRAM EQUATES THAT 


C 
TEST. 


| a cell eel aul eel aul eel aol aoe 
SSeso denen iankanbankenden tanked 
~~ ~~ ~ ~~ YN-— OOOOOOOOO®D 


SERALSSESSATSAIS BALES 


(ol ool aol ool aed aul gual anal eel aoe coal ae ae ae | ol gual aul gel geal al el a ae 
mg Omg Omg Og gy Oy Omg Og og Cog mg Oey Og Og Og OG Sg og od Sod ng Og ng ng OG 


3 
— 
cae 
S 
- 
E 
o 
— 
2 
: 
S 
— 

Ba 

= 

= 

S. 

$3 


F 
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DEFAULT HARDWARE P-TABLE 


-SBTTL GLOBAL EQUATES SECTION 


; THE GLOBAL EQUATES SECTION 


ARE USED IN MORE THAN 


3+4 


ROT BMS age es 


HC 


cvcL 
CVCLHC 


SISSSSSSSLKMA Le OORT NALLARRADAARARARASS IIIS SISRANARAR 


eT el aah aed meek cael, eh ee, eh a, eh mah, ah, ee a a a a a Ck ek eek ed eek ool ol eek el ooh ee cd rr 
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157 : 
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or 30A(1052) io 16:43 PAGE 50 


OBAL EQUATES SECTI 
yeeene INDEPENDENT EQUATES 
BUFLIM=512. MAX BUFFER si E IN BYTES 
APPLIES TO TX,RX AND CMP BUFFS 
MSGLIM=15. NO. OF MESSAGES 


(FOR EACH INCREMENT TC) 10. MSGLIM, 
ADD 6 WORDS TO THE POINTE 3 
(PTRTAB:) SINCE THIS MEANS 2 MORE 
POINTER’ WORDS PER BUFFER. 


sMODE OF OPERATION EQUATES 
REC= 


TRA= 3 TRANSMIT MODE 
PAS= sPASSIVE MODE 
ACT= sACTIVE MODE 
powes 3DOWN-LINE-LOAD MODE 
TAL= 3 TALK_MODE 

=6 sLISTEN MODE 

MAINT LOOP TYPE EQUATES 

e 3NO_LOOP 
TTL= INTERNAL TTL 
CABLE= scale LOOP 
MODLOC= sMODEM LOCAL 
MODREM= [MODEM REMOTE 
MOP= 5 MOP 


3 CLOCK wt Ene | S TO BE LOADED IN CLK*S CSR 
A mts CSR VALUE TO ENABLE THE CLOCK 


CSR VALUE TO ENABLE THE CLOCK 
PLKCT= 1600 3P=CLOCK COUNT SET REGISTER FOR COUNTER 
sPARAM WORD EQUATES 
STATB= BIT 3 OPERATOR ASKED FOR 
DATCKB= BIT DATA CHECK BI 
ECHOB= BIT sECHO nih 
HK= BIT sMODEM STATUS CHECK BIT 
CRCB= IT sCRC_CALCUALTE ASKE 
PROTOB= BIT sPROTOCOL PROCESSING ASKED FOR 
PRORUN= 118 3DDCMP TOCOL 
ABORT= BIT ZFATAL PROTOCOL ERROR 
3O0PTION TYPE EQUATES 
bPv= 0 3CODE FOR DPV CHAR MODE 
sEVENT Tyres (USED cHfons NT CRIPT N EVENT T 
; ae iy TO SEPERATE HO MEAG Me EVENT REPORT ING SECTION 


4 
- 
“ 
eee ap 0-0 
SeRAEES 
sam 
mmr 
ram 
= 
mst 
m 
5 5. 
Do 
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DNRAE 


INT TT Yee 
TTI 
Uru so 


Nrorr 
Ne 


Et 


SS Sa VORA 





ATA pantie LINK TEST 


00001 
00001 


0000 
a 
0000. 


00002 
000004 


S88 


(Cc 


INOVR= 

FIRST= 

SPECIAL CLI CODES FOR “*CHAR’’ ARGUMENT IN cu CALLS 
OMMAND L 


B1T10 
B1T11 


L 4 


DATA COMPARISON RESULTS 
MODEM STATUS CHANGE 

SDATA COMPARISON LENGH ERROR 
{DATA COMPARISON DATA ERROR 
ZEND OF PASS 


3 INPUT _INT. REC. 
OUTPUT INT REC 
3RX QUED /COMPL 
3TX QUED/COMPL 
sEXPECT TO GET A RX COMPLED 
zEXPECT TO GET A TX COMPLETED 


INDICATES " TX INTERRUPT ROUTINE 

THAT IT IS he TO TRANSMIT BODY OF MSG. 
INDICATES TO RX INTERUPPT ROUTINE 

THAT IT IS TIME TO REC MSG BODY 

3TIME FOR CRC CHECK. 


INDICATES THAT PAD MUST BE SENT 
sINIT OVER 
sFIRST TIME FOR CTS 


ay INTERPRETER DEFINITIONS) 


S$ eeeeerecenen 
eererererececcec 


ZE=1 


ane 


OMMAND LINE INTERPRETATION ACTION VALUES 


SEQ 50 
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ren SEQ 51 
ATA on it NK TEST MACY11 30A(1052) 23-MAR-82 16:43 PAGE 52 
ccna 22-MAR=82 GLOBAL EQUATES ech ION 

$4: 
te 
01 
' 

¥. 
‘ 

e?. 
10 
4 
13 
14 
iF 
9 
18 
19 
32 
Be 
$24 
4 
1 

oR 


Pu 


+ 


watt ee teeteeteeteetee teehee et et et 


ket 


3° COUNT smn RROR® 
: * COUNTER/ ULL* 


3V VALIDATE Te orrser 


s .£¢ 





“MODE n SIGMA § a iP 
mod cen: AVA N Dee EQUATE NAME TO BIT POSITION. 


cht bak: op ESATA" SET Reaby (CURCULT Ec» 


000006 Riss IIe. ipeavest 10 ns? Eincult cA) 


wees 
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CVCLHC.P11 pa ints GLOBAL EQUATES SecFion 





RI= BIT14 sRING INDICATOR cerpeust cE) 
SQD= BIT? 3SIGNAL QUALITY DETECT (CIRCUIT CG) 
TM= BIT 3MODEM IN TEST MODE (RS 449 ONLY CIRCUIT TM) 


81T1 3DATA TERMINAL READY 





RXE BIT4 sRECEIVER ENABLE 
DSITEN= BITS 3DATA_SET CHANGE ENABLE 
RINTEN= BIT sREC INT. ENABLE 
RDATRY= BIT sREC DATA 
RSTARY= B1T1 sREC STATUS READY 
cT= BIT sREC_ACTIV 
RESET= BIT sMASTER RESET 
TXACT= BIT 3TX ACTIVE 
TSMT= BIT 3TX BUFFER EMPTY 
TTLL= BIT sTTL LOOP BIT 
TXENA= BITS 3TX ENABLE 
TINTEN= BIT 3TX INT ENABLE 
74 TSOM= BIT 3TX START OF MSG. 
75 TEOM= BIT 31x Hay OF MSG. 
7 TERR= ®B61T! 3TX ERROR 
RERR= T1 sREC OVER RUN 
SYN= 3SYNC WORD 
CRCOK= B1T15 3CRC_ CHECKED GOOD 
RXOVER= BIT11 sRECEIVER OVERRUN ERROR 





CVCLHC_DPV-11 


wl COMM. i TEST 
22-MAR=82 11:09 


8B 5 
MACY11 30A(1052) 23=MAR=82 16:43 PAGE 54 
ECTION 


SEQ 53 


CVCLHC.P11 GLOBAL DATA S 

388 -SBTTL GLOBAL DATA SECTION : 

~SBTTL DEFAULT MESSAGE DEFINI: IONS AND TABLES 
S3a6 ++ 
$358 ; THE GLOBAL DATA SECTION CONTAINS DATA THAT ARE USED 

: IN MORE THAN ONE TEST. 
2388 = 
2389 
339 sMESSAGE BYTE COUNT TABLE 
$30 002150 DMSGCT: 
393 002150 000001 MSGOC: .WORD €E GO sBYTE COUNT OF MESSAGE #0 
2394 002152 000001 MSGIC: .WORD EMSG1-MSG1 sBYTE COUNT OF MESSAGE #1 
2395 002154 000001 were - WORD Ereet _neee : COUNT OF MESSAGE #2 
2396 002156 000001 MSGSC: .WORD €E SG : COUNT OF MESSAGE #3 
2397 002160 000100 MSG4C: .WORD EMSG4-MSG4 sBYTE COUNT OF MESSAGE #4 
2398 002162 000072 MSGSC: .WORD EMSGS-MSG5 sBYTE COUNT OF MESSAGE #5 
2399 002164 000101 MSG6C: .WORD EMSG6-MSG6 sBYTE COUNT OF MESSAGE #6 
2400 002166 000000 OPCNT: .WORD 0 zBYTE COUNT FOR OPERATOR SPEC'D MSG. 
at 002170 000001 MSG8C: .WORD EMSG8-MSG8 sBYTE COUNT OF RECEIVE BUFFER FILL PATTERN 
tit sMESSAGE ADDRESS TABLE 
2405 002172 DMSGAD: 
2406 002172 002214 MSGO sADDRESS Of MESSAGE 40 
2407 002174 002215 MSG1 sADDRESS OF MESSAGE #1 
2408 002176 002216 MSG sADDRESS OF MESSAGE #2 
2409 002 002217 M sADDRESS OF MESSA 
2410 002202 Besse MSG4 sADDRESS OF MESSAGE #4 
2411 002 002320 MSGS sADDRESS OF MESSAGE #5 
2412 0022 002412 MSG6 sADDRESS OF MESSAGE #6 
2413 002210 002520 Ay zADDRESS OF OPERATOR SPEC"D MSG. 
sti 002212 002642 MSG sADDRESS OF RECEIVE BUFFER FILL PATTERN 
2416 002214 000 SGO -BYTE 000 sMESSAGE OF ALL 0°S 
2417 002215 EMSGO: 
2418 002215 377 MSGi: .BYTE 377 sMESSAGE OF ALL 1°S 
2419 002216 EMSG1: 
420 002 Ig 252 MSG2: .BYTE 252 sMESSAGE OF ALTERNATING 1°S 
421 00221 EMSG2: 
5h5$ 00. $i 125 MSG3: .BYTE 125 3MESSAGE OF ALTERNATING 0°S 
2423 00 EMSG3: eee 
424 00 MSG4: “CCITT 312784! (VS. 511 Bits) TEST_PATTERN 
425 002220 177603 157427 031011 WORD 177603, 157427,031011,047321, 163715, 105221, 143325, 142304 
426 002226 O67 36) 163715 105221 
“ 5 00 40 0400 i b1ai16 052606 WORD 040041,014116,052606, 172334, 105025, 123754 ,111337,111523 
Ba fest fires ettsy (at oat NINA NC 
431 00 ? 145064 137666 -WORD 030030, 145064, 137642, 143531 ,063617,135075 .066730,026575 
ae Bese dio feu 1H 
434 05201 27 070071 -WORD 052012,053627,070071,151172, 165044 .031605 , 166632 ,016741 
435 151172 165044 851605 
4 14 166632 016741 
& EMSG4: 


CVCLHC DPV=11 DATA COMM LINK TEST 
CVCLHC.P11 22=MAR-82 11: 

438 002320 

By 002320 077577 44 052 
441 003 5 06951 afr a335 
44 90 04 5 104 4736 
44 ; 7) 304 5411 
444 002350 045040 : 5 942520 
445 002356 0201046 053117 05110 
446 002364 052040 042510 946040 
447 002372 055101 020131 04 
448 0024 027107 

449 00240 5015 077401 077577 
450 002410 00017 

451 00241 

452 00241 

453 00241 022043 021041 02304 
2454 002420 024047 025051 02605 
2455 002426 027055 030460 03146 
456 002434 0 2464 3466 0544 
457 002442 035472 036474 037476 
2458 00245 0405 1308 042504 
2459 002456 043506 044510 045512 
3460 464 046514 047516 050520 
461 002472 0313¢2 052524 053526 
346 2300 054530 132 

463 00250 057 056133 057135 
2464 002510 022537 000 

2465 00251 

2466 002514 

2467 

468 

469 

470 

471 002514 047045 040445 

472 002520 000122 

473 002642 

474 

ii 

3677 

478 00264 033 

2479 00264 

2480 002644 


¢ 5 


MACY11 30A(1052)_ 23-MAR-82 16:43 PAGE 55 
DEFAULT MESSAGE DEFINITIONS AND TABLES 


MSGS: “INTERPROCESSOR TEST PROGRAM'S (ITEP)'’ MESSAGE 
sASCII <177><177>/$A THE QUICK BROWN FOX JUMPED OVER THE LAZY DOG./ 


SEQ 54 


eASCIZ <15><12><001><177><177><177><177> 
EMSGS: 
MSG6: j ALP URUMERICS (OR FUTURE COMM TURNAROUND MSG) 
eASCII /#S!"" &'() 4+, -.0123456789: ; <=>?@ABCDEF GHI JKLMNOPORS TUVWXYZ/ 


eASCIZ = ?/0\}*_2? 


EMSG6: 
- EVEN 


J RRRRRRRERERRRRERAER REA EEAERAERREREEREEREREERREREERRARERRERRERERREREE 
s THESE THREE STORAGE AREAS MUST NOT BE SEPERATED !!!! 

OPBFPT: .ASCII /2NZA/ 
oy -BLKB 82. sBUFFER FOR OPERATOR SPEC'D MESSAGES 


; THE ABOVE THREE LINES MUST BE KEPT TOGETHER 


3 RAEAEAAAAAAAAAAAAAERARAAAEAEEEAEAEAAAREAAARAARARAEREREEAEERAAAAAEEEAERAREREEREEE 
MSG8: BYTE 33 sRECEIVE BUFFER FILL PATTERN 
EMSG8: jams 


SEQ 55 
CVCLHC DPV-11 DATA COMM. LINK TEST MACY11 30A(1052) 23-MAR-82 16:43 PAGE 56 
CVCLHC.P11  22=MAR-82 11:09 DEFAULT MESSAGE DEFINITIONS AND TABLES 
481 ag eseeeeeeceeeeeeeseeeeeeeeeeeeeeeeeeeeeeeeeeeeereeee seaeuce 
be : The Pott GiAG" 18’ thé’ AREA’ GSEB' 10° TRANSAIT’ AND ghee Ti BY 
485 R MSGS. AND THE START: STACK ACK SEQUENCE 
485 se eachacaaieansauaaexsanabenaaned 1abaanzaaansiaeeeieel 
486 THE TRANSMIT HEADER MESSAGE WILL BE STORED HERE 
48 002644 000 hbMSG: SFILLER 
488 90 645 201 HDMID: .BYTE 201 SMESSAGE TYPE STORED HERE 
489 646 HDMTYP: SIF CONTROL MESSAGE, TYPE IS STORED HERE 
490 002646 000000 HDMCC: .WORD 0 [CHAR COUNT GOES HERE 
491 002650 001 HDMREP: .BYTE 1 RESPONSE 
492 002651 001 HDMNUM: .BYTE 1 °MSG. NUMBER 
493 00265 001 HDMADR: .BYTE 1 ADDR TO. 
2494 00265 HSMSE : 
2495 2654 EVEN 
2496 002654 $0006 HDMC: WORD 6 
497 RECEIVED HEADER WILL BE STORED HERE 
498 00265 000 RiDmsSG: .BY 
2499 00265 201 RHDMID: .BYTE 201 sMESSAGE TYPE GOES IN HERE 
500 002660 RHDTYP: SCONTROL MESSAGE TYPE GOES HERE 
501 002660 000000 RHDMCC: .WORD [BYTE COUNT GOES HERE 
50 002662 001 RHDREP: .BYTE 1 :RESP NUM 
503 00266 001 RHDNUM: .BYTE 1 [MSG NUM 
2504 002664 001 RHDADR: .BYTE 1 TADDR TO. 
3305 002666 EVEN 


E 5 
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CVCLHC.P11 22-MAR-82 11:09 DEFAULT MESSAGE DEFINITIONS AND TABLES 


SEQ 56 


507 COMMAND LINE BUFFER, DATA LOCATIONS AND MESSAGES FOR ACTION ROUTINES 
509 002666 900122 CMDBUF: .BLKB 82. :BUFFER FOR OPERATOR COMMANDS 

510 00301 KEYWD1: .WORD 0 :THIS LOC WILL =1 IF CLEAR TYPED, 2 FOR SHOW, 
511 : A TYPED, 5 IF HELP WAS TYPED 
312 003012 000000 QUALFG: .WORD :THIS LOC HOLDS QUALIFIER VALUE (SIZE OR COPY) 
513 003014 QUALVL: .WORD 

51% 003016 01 HLPTAB: .WORD 4HLP1 

515 003020 01231 “WORD -HLP 

516 003022 012430 “WORD LP. 

$31 003024 oI 515 “WORD LP 

518 003026 012542 “WORD HLP. 

2519 003030 01 621 “WORD HLP4A 

2520 003032 012677 “WORD HLPS 

2521 003034 012767 “WORD HLP6 

$256 003036 HLPEND: 

5 INDEX TABLE FOR REPORT 'RPT>* HELP MESSAGES REV B EC 

524 003036 013124 RHLPTB: .WORD RHLP1 

385 003040 013146 “WORD RHLPE 

2526 003042 01 201 “WORD RHLP 

2527 003044 013232 “WORD RHLP 

528 3046 013264 “WORD RHLPS 

529 003050 013327 “WORD RHLP6 

2530 003052 RHLPEN: 

3330 003052 013543 013552 013557 SHTYTB: .WORD SHTYPO,SHTYP1,SHTYP2,SHTYP3,SHTYP4,SHTYP5S,SHTYP6,SHTYP7 
533 00 013564 013571 013577 

534 003066 013604 013612 

$232 ; THE LIST OF BYTES BELOW ARE THE FIRST BYTES OF THE PREDEFINED MESSAGES 
$937 + USED TO ‘SHOW’ THE TRANSMIT AND COMPARE BUFFER CONTENTS. 

3339 003072 000 377 252 SHTAB: .BYTE 0,377,252,125,203,177,043 

540 003075 125 203 17 

2541 003100 043 

g54¢ 003101 SHTEND: 

3343 003102 EVEN 

2545 003102 0136 MODES: .WORD M00 sADDRESSES OF MODE TYPES IN ASCII 

2946 003104 01 3 “WORD M01 

547 0031 13644 “WORD MO 

548 003110 013654 “WORD MO 

549 003112 013663 “WORD 

550 11 ot 00 "WORD M05 

332 116 01370 WORD 

55 1 13714 LOOPS: .WORD LPO sADDRESSES OF LOOP TYPES IN ASCII 

554 oO 122 13726 “WORD LPI 

555 0031246 137 5 “WORD LP 

356 0031 13743 “WORD LP 

35 0031 13756 “WORD LPS 

339 :COMMAND LINE TRAVERSE LOCATIONS (USED BY ‘PSTRV'’) 

561 0031 PSBUFA: .WORD :LOC. TO HOLD ADDR. OF CMD LINE BUFFER 
562 NTE saad PSTREE: .WORD 8 LOC. TO HOLD ADDR. OF PARSING TREE 


CVCLHC DPV=-11 DATA C LINK TEST 
CVCLHC.P11 2 AMAR CBS 1509 
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MACY11 eg 23-MAR-82 16:43 PAGE 58 
EFAULT MESSAGE DEFINITIONS AND TABLES 


: SEQ 57 


PSACT: .WORD 3LOC. TO HOLD ADDR. OF write ROUTINE 

PSCNT: .WORD LOC. TO BE A COUNTER LOCA Mad 

PSNUM: .WORD 3LOC. TO HOLD NUMERIC V. VALUE F ROM PARSE 
PSRADX: .WORD sLOCc. TO ei] RADIX USED(LO) AND +/-(HI BYTE) 
PSNNUF: .BYTE RETURN =0 I OF COMMAND FOUND 


FE 
PS$GDBD: .BYTE RETURN cove 0 IF NO ERROR FOUND 


CVCLHC_DPV-11 
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MACY11 PSE 23-MAR-82 16:43 PAGE 59 


GE BUFFERS AND POINTER TABLES 
MESSAGE BUFFERS AND POINTER TABLES 


LI : I SON BUFFERS 
MSGLI 3TABLE FOR MESSAGE ADDRS. & BYTE COUNTS 
MSGLIM* 
MSGLIM* 


; END OF MSG. PTR. TABLE 
sFILLER FOR OVERFLOW OF RX POINTER TABLE 


et MESSAGE POINTER 
TRANMITTER BUFFER POINTER 
ARISON BUFFER POINTER 
3 CRP MSG TOTAL 
sCOMPARE BUFFER CHAR. COUNT 
+ CURRENT ADDR OF CMP BUFF TO ADD AT 


sDEVICE iy ADDR 

3DEV ICE TX CHAR COUN 

sDEVICE TX MESSAGE COUNT 

3TX MSG TOTAL 

:TX BUFFER CHAR. COUNT 

[CURRENT ADDR. OF TX BUFF TO ADD AT 


sDEVICE RX 

sDEVICE RX CHAR COUNT 
sDEVICE RX_MESSAGE COUNT 
RX MSG TOTAL 


sNUMBER OF OPERATOR AWAKE MSGS 
3OPTTIONAL ates LOCATION 


AR 
END ADDR. FOR DUMP 
3BYTE BIT FOR DUMP ROUTINE 


SOCOOCOOO SCOOO ScCOOoOoOoOO oOOoOooeSeo 


ZOTHER MESSSAGE RELATED STORAGE LOCATIONS 
MSGTYP: .WORD 


0 TYPE OF DATA 0=0°S,1=1°S,2=10°S,3=01'S 
-4=CCITT 5=4UICK FOX, O= AL PHA/NOM, 7=OPER 
:TX/RX/CAP CHAR COUN 
3 CURRENT RX SINTER 
[CURRENT POINTER 
CURRENT TX/RX/CMP START ADDD 
$TOTAL CHAR COUNT NOT MORE THEN ‘SBUFLIM’ 


T COUNT 
TEMPORARY LOCATIONS (USED A LOT) 


sCONTROL OUT ERROR MSG. ADDRESS NW 


CVCLHC DPV-11 DATA. ATA COMM LINK TEST MACY11 30A(1052) 23-MAR-82 16:43 PAGE 60 
CVCLHC.P11  22=MAR-B2 11 MESSAGE BUFFERS AND POINTER TABLES 


332 /NDO0 CONTIN: .WORD sWORD FOR CONTROL IN 
ae yA 7BYTE TO HOLD or iee MESSAGE DATA BYTE FOR ERR REPORT 


SEQ 59 


555 SBYTE TO HOLD RECEIVED MESSAGE DATA BYTE FOR ERR REPORT 


I 5 


CVCLHC bevel al IR on it NK TEST MACY11 30A(1052)_ 23-MAR-82 16:43 PAGE 61 
CVCLHC.P11 MESSAGE BUFFERS AND POINTER TABLES 


sMORE INDEPENDENT CODE STORAGE LOCATIONS 


55 : sLOC. TO HOLD LOGICAL UNIT rr 
5 PCADD: 3LOC. HOLD PC OF CALLING ROUT i 
: :CLEANUP & EXIT F FLAG -1 = EXIT TEST 
LAG (<1) THAT A RESTART WAS GIVEN 


=L 4 Cie terhek 6=L (STEN) 
570 : : COSNONES “fz] NTERNAL TT, 
: 3=MODEM-ANALOG LOOPaK  (L (LOCAL F 


006572 FHDPLX: : E Een P-TABLE ! 
006574 PARAM: : PAR T 


SERERESES 


z 
oa 


RPASS: .WORD 0 
FLAG: .WORD 0 


:MODE DISPATCH TABLE 
MODE: .WORD RXONLY 


RRRR RO 


SOIRUE UNO 
oococo 
ron 


rt 


LOCK TABLES, EVENT LOG AND POINTERS 
; otk ADDRESS 


3CL " 
. 7CLOCK'S HERTZ RATE 
3CLOCK’S CSR VALUE TO INTRPT. ENABLE IT 


sPLACE TO KEEP TIME-SINCE-START 
sPLACE TO KEEP # OF TICKS/SEC 
sEVENT vier i (TICKS) 


SEVENT TIMER (TICI’S) 
EVENT TIMER #3 (SECONDS) 


006600 
006602 
006604 
006606 
gneel9 
00661 
006614 
006616 
eS 
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CVCLHC DPV-11_ DATA on LANK TEST MACY11 30A(1052) ~ aa 16:43. PAGE 62 
CVCLHC.P11 22=MAR-82 11: CLOCK TABLES, EVENT LOG AND POINTERS 


$650 sEVENT LOG TABLE AND ITS NEXT ENTRY POINTER 
1 006650 EVTPTR: .WORD TLOG ;POINTER TO NEXT FREE SPACE IN EVENT LOG 
50 000341 EVTLOG: .BLKW 5. EVENT LOG FER 
552 000001 EVTEND: .BLKW . SAPPROXIMATE END OF EVENT TABLE (ALLOWS CIRCULAR QUE) 
5 -SBTTL MODEM DATA SECTION 
eet 007554 000000 MODS: .WORD 0 sMODEM STATUS 


9 


SEQ 61 


SEQ 62 
CVCLHC_DPV-11_DATA COMM LINK TEST MACY11 30A(1052) 23-MAR-82 16:43 PAGE 63 
CVCLHC.P11 22-MAR-82 11: MODEM DATA SECTION 
90 
pa ;TABLE OF MODEM SIGNAL BIT DEFINITIONS 
93 00755 4H MOBITS: .WORD CTS sCLEAR TO SEND (CIRCUIT CB) 
94 75 1 WORD DSR sDATA SET READY (CIRCUIT CC) 
95 7 10000 WORD DCD 3DATA_ CARRIER DETECT (CIRCUIT CF) 
7564 WORD RTS sREQUEST TO SEND (CIRCUIT CA) 
9 75 WORD RI 3RING INDICATOR (CIRCUIT CE) 
98 00757 eWORD SQD SIGNAL QUALITY DETECT (CIRCUI ) 
99 007572 000040 -WORD 1M 3MODEM IN TEST MODE (RS 449 ONLY CIRCUIT TM) 
ro 007574 MOBITE: 
ia ;TABLE OF ADDRESSES OF MODEM SIGNAL MESSAGE POSITIONS 
704 007574 016477 MOMSGS: .WORD EVMCTS sCLEAR TO SEND (CIRCUIT CB) 
705 007576 016503 -WORD EVMDSR sDATA SET READY (CIRCUIT CC) 
706 007 016507 WORD EVMDCD sDATA CARRIER DETECT (CIRCUIT CF. 
707 007602 016513 WORD EVMRTS sREQUEST TO SEND (CIRCUIT CA) 
708 007 016517 WORD EVMRI 3RING INDICATOR (CIRCUIT CE) 
709 007 BIG3¢s WORD EVMSQD 3SIGNAL QUALITY DETECT (CIRCUIT CG) 
ry 007610 016527 ° EVMTM 3MODEM IN TEST MODE (RS 449 ONLY CIRCUIT TM) 
ap zTABLE OF ADDRESSES OF EVENT DESCRIPTION MESSAGES 
ay : ORDER CORRESPONDS TO MESSAGE TYPE VALUES 
715 007612 015101 EVTLST: .WORD EDTXQ ; TRANSMIT MESSAGE QUEUED 
stig 007614 Bisie? .WORD EDTXC ;TRANSMIT OF MESSAGE COMPLETE 
717 007616 015154 WORD EDRXQ ;RECEIVE MESSAGE SPACE QUEUED 
2718 B07638 15201 -WORD EDRXC ;MESSAGE RECEIVED - RECEIVE COMPLETE 
719 +007 13¢ 7 -WORD EDDER ;DEVICE INFORMATION 
720 007624 015274 eWORD EDDVI ;DEVICE INITIALIZE STARTED 
721 007 15244 WORD EDDCK ;DATA COMPARISON DONE 
$isé 007: 15426 -WORD EDMOS ;MODEM STATUS CHANGE 
0076 15 § WORD EDDLE ;DATA COMPARE LENGTH ERROR 
724 7 0153 WORD EDDDE ;DATA COMPARE DATA ERROR 
5 7 b1278s ~WORD EDEOP ;END OF PASS 
ie: 0071 1545 WORD EDABO ;*C 
728 sLOCATIONS USED DURING EVENT REPORTING 





EVTSEC: .WORD ; TEMPORARY LOCS TO KEEP EVENT TIME WHILE REPORTING 
1 EVTMIN: -WORD 
EVTTCK: .WORD 
EVTADD: :WORD ;TEMP. LOC. TO HOLD ADDRESS DURING EVENT, REPORTING 
EVTBCT: :WORD ; - - COUNT *" “ ™ 
5 EVTTMP: .WORD ; OTHER DATA 
739 ;REPORT CODING DISPATCH TABLE 
0076 76 RPTDSP: .WORD RPTTXQ ;TRANSMIT QUEUED ENTRY DECODING 
740 007 ? “WORD RPTTXQ ; TRANSMIT COMPLETE ENTRY DECODING 
741 007 ? “WORD RPTIXG ;RECEIVER QUEUED ENTRY DECODING 
742 007 7 “WORD RPTTXO SRECEIVER COMPLETE ENTRY DECODING 
743 007 5 “WORD RPTDER ;DEVICE ERROR ENTRY DECODING 
44 0076 444 : RPTDVI DEVICE INIT ENTRY DECODING 
745 0076 640 “WORD RPTDCK DATA COMPARISON ENTRY DECODING 





CVCLHC_DPV-11 
CVCLHC.P11 


i 
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: SEQ 63 


MACY11 30A(7952)_ 23-MAR-82 16:43 PAGE 64 
MODEM DATA SECTION 


sREPORT MODEM STATUS CHANGE 
DATA COMPARISON LENGH ERROR 
:DATA_COMPARISON DATA ERROR 
3END OF PASS 

:“C ABORT 


:TEMP LOCS TO HOLD DATA FOR EVENT REPORTING 
; AND SHOW MODE,... SUBROUTINE 
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SEQ 64 
CVCLHC DPV=-11 DATA COMM LINK TEST MACY11 30A(1052) 23-MAR-82 16:43 PAGE 65 
CVCLHC.P11  22=MAR=82 11:09 COMMAND LINE ACTION TREE 
3758 .SBTTL F COMMAND LINE ACTION TREE 
760 ;SAMPLE CLI TREE NODE (ALWAYS AT LEAST 1 WORD) 
762 : ! ACTION ! CHAR CODE ! 
764 : ! MISS DISPLACEMENT ! ONLY IF “MISS'’ ARGUMENT DEFINED 
£66 ; {NEXT NODE DISPLMNT ! ONLY IF “‘ASCII°' ARGUMENT DEF "NED 
768 : ' | ASCIZ “MATCH STRING ! ONLY IF “‘ASCII"' ARGUMENT DEFINED 
769 : (. EVEN) ! 
2771 
2772 
2773 007716 CLITRE: 
2774 
2775 :FIRST KEYWORD 
2776 007716 CLI CLISPA,0,N10$ :$KIP ANY LEADING SPACES, 
2777 007722 N10$: CLI <*9>,HLP.N42$ SIS THE FIRST NON-SP CHAR A °? 
2778 007726 CLI CLIEXI,0 : IF YES DO ‘LP’ EXIT 
2779 007730 N42$: CLI CLISTR.HLP,N43$,<"HELP'> SELSE, 1S FIRST WORD A "HELP* 
2780 007744 CLI CLIEXI.0 : YES DO “WLP AND EXIT 
2781 007746 N463$: CLI CLISTR.PRNT,NG4$,<"PRINT'> ZELSE, IS FIRST WORD A PRINT 
782 007762 CLI CLIEXI.0 : PRINT’ AND EXIT 
783 007764 N44$: CLI CLISTR.EXIT,N45$,<°EXIT'> SELSE, IS FIRST WORD ‘EXIT’ :REV B BY EC 
2784 010000 CLI CLIEXI. : IF YES 00 ‘EXIT’ AND EXIT 
2785 010002 N45$: CLI CLISTR,RUN,N46$,<"RUN’> SELSE. 1S FIRST WORD A ‘RUN’ 
2786 010014 CLI CLIBR,O, : IF YES DO ‘RUN’ & GOTO N80S 
2787 010020 N46$: CLI CLISTR,NOTNUF .N4OS,<*DUMP"> TELSE, IS FIRST WORD A ‘DUMP’ 
3788 010034 CLI CLI N : YES GOTO N8O$ 
789 010040 N40$: CLI CLISTR, char at <"CLEAR'> SELSE, IS FIRST WORD A “CLEAR 
2790 910054 eLI CLIBR NOT ;_ IF YES DO “CLR’' & GOTO N100$ 
791 010060 N20$: (CLI TELSE, IS FIRST CHAR. A'S 
2792 010064 CL? cist, shou NDS $.<*How'> + IF YES IS REST OF WORD ‘HOw’ 
2793 010076 CLI 1308 ; _ IF YES. DO "'SHOW"'.BR, N100S 
g7e% 10102 N25$: CLI ay 6. N30S.<"ET"> ; ELSE, IS REST, OF yorD ‘eT 
795 010114 CLI : IF YES, DO “SET, BR N1108 
796 010120 N30$: (CLI ERA. 6 SOTHERWISE “ILL cm EXIT 
798 :SECOND KEYWORD (MODE=) FOR RUN COMMAND 
B00 010122 N80$: CLI CLISPA,0,N30$ :SKIP LEADING IF NONE-ERR 
ty 101 $ N81$: CLI cLISTR. TNUF ,N30$,<°MODE *> 1S NEXT WORD hobeL 
802 1014 ram <*'=>,0.N : IF NO, IT°S WRONG -ERR -EXIT 
803 010146 CLI CLIStR: Aton oNB2S,<"ACTIVE'> 31S NEXT “WORD ‘““ACTIVE' 
804 010164 CLI cLiBR 6 IF YES, DO “ACTIVE BR N115S 
805 0101 N82$: CLI STA, PASMOD .NB3S,.<* PASSIVE"> 31S NEXT GORD ‘PASSIVE 
806 10 ra LER IF YES, DO “PASSVE'BR N115S 
80 10 1 N83$: CLI CLISTA shEcnge. N84$,<"RECEIVE’> 31S NEXT ORD RECEIVE” 
808 1 CLI CLIBR : IF YES *RECVE'.BR NI15$ 
10 Na4$: CLI CLIS mi sCtsnge ess, <'LISTEN'> 1S 'NEXT WORD au STEN” 
810 010 CLI CLIBR > IF YES, DO “LISTEN’,BR BR NI15S 
Ble O10 eet: eet pened pan? veg She? i Br Niiés 
518 10 N86$: CLI TS ON [1S NEXT CHAR A 'T 





CVCLHC DPV-11 
CVCLHC.P11 


as gue 
010334 
010 


esses 
FRESE 
SRUeS 


834 
2836 
10502 
838 0105 
839 01051 
3h 
01052 
0105, 
0105 
844 010536 
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COMMAND LINE ACTION TREE 


DO CLRnex Exit 


Cul CLISTR TRAMOD.NG7S,<"RANSMIT'> ; IS REST OF WORD “RANSMIT 
ra CL18R,0,N1 : IF YES, DO SRANSH BR wi15$ 
N87$: CLI CLISTR th ALAOD »N30$,<"ALK'> : IS REST OF WORD ' 
CLI CLIBR,6, : IF wes DO PALA N115$ 
t IF NO, ERROR = EXIT 
:SECOND KEYWORD (FOR OR CLEAR 308 SHOW) 
N100$: CLI CLISPA jSkIP LEADING SPACES 
N102$: CLI CLISTR. ghey N1068, <"EXPECTBUFF *> 
CLI CLIEXI, : IF YES, 
N104$: CLI CLIS TR, CSHTRN.N3OS, <° TRANSMI TBUFF *> 31S NEXT 
CLI CLIEXI, : IF YES, DO CURA EXIT 
SIF NO = ERROR = EXIT 
sSECOND KEYWORD (FOR SET) 
N110$: CLI CLISPA,0,N30$ 
N111$: cL CLISTR, SET XP,N112$,<"EXPECT’> 
N112$: (CLI CLISTR, SETTRN,N30$,<* TRANSMIT "> 
CLI CLIBR,6,N120$ 


OMMAND 
CLIALP.0,N51$ 


I N52$ 
Ng2S CLI CLIOC S.N3 
CLI a5 i ae 


CLI cL 10 N30$ 
cL 2 NOTNUF .N125$ 
Ctl EL iah DAP «NSO 

ZQUALIFIERS FOR THE RUN COMMAND 

115$; CLI ct 7at nthe 258 

N114$: CLI 20 NOTHUE Ni25s 
cll cist 116$,<"No'> 

N116$: CLI $"3° Mt 
CLI cListr. RA CHECK N117$,<°HECK"> 
ra | CLIBR 

n117$: CLI CLISTR gSTATUS.NI18S, <°STATUS"> 
CLI CLIBR 

n118$: (CLI CLISTR Wit N119$,<"ECHO'> 
rae | CLIBR 

N119$: CLI <'P> 0.N1 
ct Bit ate i308, <*ROTOCOL'> 

n130$: ¢L cList Th,6 »<"ASS'> 
CLI CL srk 6.41 

N132$: CL LISTR N131$,<"MODEM'> 
et} tian Oniiss 

wi31$: CLI CLISTR,O.N30$,<*LOOP"> 


SEQ 65 


B 6 
CVCLHC_DPV-11_ DATA COMM. LINK TEST MACY11 30A(1052) 23-MAR-82 16:43 PAGE 67 





CVCLHC.P11 22=MAR-82 11:09 COMMAND LINE ACTION TREE 
2870 010752 CLI CLIBR,O,N140$ 
4 cer MESSAGE TYPE FOR SET MESSAGE COMMANDS 
873 010756 CLI "=>,0,N30$ 
875 : _ LOOK FOR DEFAULT MESSAGE NAME 
876 010762 N60$: CLI CLISTR,CMSG1.N61$,<"ONES'> 
2877 010776 CLI CLIBR,6,N121 
2878 011002 N61$: CLI CLISTR sensi, N62$,<° ZEROES "> 
2879 011020 CLI CLIBR 
880 011024 N62$: CLI cLiBr 6 €MSG2,N63$,<"1ALT'> 
881 011940 CLI CLIBR,O,N 
2 011044 N63$: (CLI CLISTR,C tns 3,N64$,<"OALT'> 
2 011060 CLI CLIBR,O,N121 
2884 011064 N64$: (CLI CLISTR,CMSGS ,NOS$,<‘ITEP"> 
2885 011100 CLI CLIBR,O,N121 
2886 011104 N65$: CLI CLISTR énsGe N66$,<"CCITT'> 
2887 011120 CLI CLIBR,O,N 
2888 011124 N66$: (CLI CLISTR genset N67$,<"ALPHA'> 
2889 011140 CLI cLier 6 
2890 011144 N67$: CLI CLISTR.SETET,N68$,<"TRANSMIT’> ;REV B BY EC 
2891 011164 CLI CLIBR,0,N125$ 
289, : _ LOCK FOR QuoTED, senor 
2893 011170 N68$: CLI <"'> AOPRASE. N30$ 
2894 011174 N70$: CLI <"*>°ENDQO,N71$ 
2895 011200 CLI CLIBR,O,N121$ 
289 011204 N71$: CLI —CLISPA,6,N72$ be 
2897 011210 N72$: CLI CLIALN,O.N73$ ZONLY A-Z,SP,TAB, OR 0-9 BETWEEN ‘"'S 
2898 011214 CLI — CLIBR,0,N70S ; 
2899 011220 N73$: (CLI CLIERR,BADCHR sPRINT ERROR IF NONE LEGAL CHAR FOR '"S 
2501 sGET QUALIFIERS (SIZE OR COPY) FOR SET MESSAGE COMMANDS 
2 011222 N121$: CLI CLIALP,0,N123$ 
3903 011226 N1338: et <*/>, NOTNUF ,N125$ 
011232 CLI cist SIZE *N1328,<°SIZE" > 
2905 011246 CLI LIBR,0,N12 
2906 011252 N122$: CLI Tete acoPy N30$,<'"COPY'> 
2907 011266 CLI CLIBR,0,N126$ 
:NUMER FOR SIZE OR copy 
$510 011272 N126$: CLI <'=>,0,N30$ 
2911 O11276 CLI cL IDES NON N30$ 
Bae 011 CLI CLIBR,0, WEST 
2914 :GET MAINTENANCE h00P, YP for RUN "LOOP" QUIALIFIER 
oe 011306 N140$: CLI 
1 
18 011312 N141$: CLI CLISTR, TTLLOP.N142$,<° INTERNALTTL*> 
19 011334 CLI CLIBR wit o. 
20 011340 N142$: cL tLIerA eB N143$,<"CABLE'> 
4 11360 N143$: CLI CLISTR CRDL OP .N1448,,<* LOCALMODEM' > 
é 11402 CLI CL1BR,0,N1 
4 11406 N144$: (CLI CLISTR RADL OP .N3OS.,<* REMOTEMODER'> 
25 0114 CLI CL1BR,6,N115$ 


CVCLHC DPV-11 DATA 
CVCLHC.P11 2 


xe 


5336 011450 
2936 


AaB ge TS 


C 6 


MACY11 30A(1052) 23-MAR-82 16:43 PAGE 68 
COMMAND LINE ACTION TREE 


:GET_ LINE NUMBER FOR R PASS RUN QUALIFIER 
N150$: CLI <‘s 
CLI fLIpee” PASC .N30$ 
CLI CLIBR,6,N115$ 
s END-OF =L INE 
N125$: CLI CLIEXI,0 


SEQ 67 
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SEQ 68 
CVCLHC_DPV-11 alle COMM. = TEST MACY11 30A(1052) 23-MAR-82 16:43 PAGE 69 
22-MAR-82 11: COMMAND 


CVCLHC.P11 LINE ACTION TREE 

3338 
$o25 DEVICE DEPENDENT STORAGE LOCATIONS FOR 

? ¢ CURRENT DEVICE PARAMTERS 
ae 011032 000000 RXCSR: .WORD 0 sREC_CONTROL AND STATUS 
2944 011454 000000 PCSAR: .WORD 0 ZSTATUS REGIST 
2945 011456 000000 RDSR: .WORD 0 3 DATA AND STATUS REG 
2946 011460 000000 TXCSR: .WORD 0 3 TRANSMI C. CONTROL 
2947 011462 000000 TDS -WORD 0 3 TRANSMIT DATA AND STATUS REG 
2949 
2950 011464 000000 INVEC: .WORD 8 3 INPUT _INTERRUPT VECTOR ADDRESS 
2951 011466 000000 OUTVEC: .WORD ZOUTPUT INTERRUPT oo ADDRESS 
2952 011470 000000 INTPRI: .WORD 0 ZINTERRUPT PRI 
i 011472 065626 DPVP1: .WORD 065626 THIS in is BROKEN DOWN AS FOLLOWS 
2955 3BITS 8-10=ERR DET SELECTED 
2956 sTHIS IS at TO SYNC 262 sB1T11 = IDLE 
2957 3CRC 16 I TO 1 sBITI¢ = SEC ADDR. MODE 
2958 STRIP SYNC AND BCP MODE sBIT13 = STRIP SYNC 
2959 ZIDLE SET TO MARK 3BIT14 = PORTO TYPE SEL(1=8CP 0=B0P) 
soot 3BIT15 = ALL PARTIES ADDRESS.. 
$965 011474 000000 ~WORD 0 3CURRENT MODEM 
2964 011476 000000 IRXCSR: .WORD 0 s IMAGE OF RXCSR 
2965 011500 000000 WORD 0 IMAGE OR RDSR 
2966 011502 000000 TR: .WORD 0 3MSG PTR.FOR HEADER OR CONTROL 
Sock 011504 000000 MSGCC: .WORD 0 sMSG COUNTER OR CC 

ott ate 000000 SYNCC: .WORD 0 3SYNC CHAR COUNT. 

$958 01151 asta SYNCW: .WORD 0 3 SYNC Ve af PLUS TSOM BIT. 

70 011512 T: .WORD 0 3MSG PT REC 
2971 011514 000000 RMSGCC: .WORD 0 COUNTER FOR REC 
$or6 011516 sitet -WORD 0 7CRC HOLDING LOC. 
$3 011388 MGLCNT: .WORD 0 COUNT OF GLITCH ERRORS 

74 011522 000000 : WORD 0 SCOUNT OF HARD ERRORS 

011524 000000 : WORD 0 71=REMOTE NODE ITEP,O=NON ITEP 


5978 : ERRTBL 


E 6 
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CVCLHC.P11 GLOBAL TEXT SECTION 


SEQ 69 


Le -SBTTL GLOBAL TEXT SECTION 
1 
4 2 THE GLOBAL TEXT SECTION CONTAINS FORMAT STATEMENTS, 
: MESSAGES, AND ASCII INFORMATION THAT ARE USED IN 
2984 3 THAN ONE TEST. 
2985 i- 
2986 
rtf -SBTTL DEVICE SUPPORTED 
4444 : NAMES OF DEVICES SUPPORTED BY PROGRAM 
2991 
5338 
299 011396 DEVTYP <DPV-11> 
2994 011526 LSDVTYP:: 
3396 Ott 3¢9 050104 026526 030461 SASCIZ /DPV=-11/ 
7 011536 EVEN 
2998 
$500 - SBT TL PROGRAM IDENTIFICATION 
Fd ; TEST DESCRIPTION 
3003 O11 338 DESCRIPT <DPV-11 DATA COMM LINK TEST > 
3004 011536 LSDESC:: 
3005 011536 050104 026526 030461 eASCIZ /DPV-11 DATA COM 
3006 011544 egies 052101 020101 
3007 011552 047503 046515 046040 
011560 047111 020113 042524 
011566 052123 000040 
1 EVEN 
1 EVEN 


US WO 


Sees 


F 6 
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CVCLHC.P11 22-MAR 11: GLOBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO 


SEQ 70 






2o8 
ever 
z 


Ss 
zz 


SE 






SVL —— 190 


PUT aed od CL ed ot FL 


BR BRNVRONANSRE 
aS mae 

An 

~ 
_ RSs 






—O— 
ate 


/ALPHA/ 
/OPR_SPEC/ 


WWW 


RF FR 
Sco —o& 
LA th oak 


wa 





Hert oS 


=AW S @O— 


MUU 

OH 

3 

e 
eeeeeveeee2 e220 


/ 
/LISTEN/ 
4/ 
?/LOOP=? 


2/L 
?INTERNAL? 


a .SBTTL GLOBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO 
18 01157 0415 114 000076 CLISPM: ASCH /DCLT>/ 
11 501 2 126 CLISRP: .ASCIZ /RPT>/ “REV B BY EC 
1160 3 037 1 CLIERM: .ASCIZ /%NZA?ILL CMD-BAD SYNTX?/ 
116 1 7501 CLINUF: .ASCIZ /ZNZA7INCMPLTE CMD?/ 
11 04 4 7077 CLINSBG: .ASCIZ /%NZA2NUM TOO B1G?/ 
011 4 10¢7 CLIBRX: :ASCIZ /3NZA2BAD RADIX?/ 
Olive 04 4 1077 CLIBDL: :ASCIZ /ZNZA2°LOOP" VALID ONLY IN ACTIVE?/ 
11764 04704 45 0 1077 CLINPS: .ASCIZ /ZNZA?"ECHO" VALID ONLY IN PASSIVE?/ 
oI 7 706 2 316 7 o1 CLIBCR: -ASCIZ /ENZA7ILL_CHR~ "A-Z,0-9,SP,TAB’ ONLY?/ 
12074 04 4 10 7 CLISEO: .ASCIZ /%N%A?°'SIZE=0°° NOT VALID?/ 
012125 04 022516 037501 CLIPW: -ASCIZ /ZNZA?TRANSMIT © EXPECT LIST MUST BE IDENTICAL FOR LOOP?/;REV B EC 
gt 13 022516 052101 HLPO:  .ASCIZ /%NZATHIS IS DCLT. TYPE "H'’ OR ''?"’ FOR DETAILS/ 
1 5 022516 000124 HLPF: .ASCIZ /%NZT/ 
01 041504 052114 041440 HLP1: .ASCIZ /DCLT CMDS:/ 
1 1 0 0461 04 505 HLP2: .ASCII / CLEAR OR SHOW EXPECTLIST OR TRANSMITLIST/<15><12> 
1 0 0511 111 “ASCII = / PRINT/<15><12> 
012377 3040 0541 03 111 "ASCII. / EXIT/<15><12> ;:REV B EC 
012406 042040 0465 120 “ASC1Z 2? DUMP START 
01 430 051440 0521 440 HLP3: .ASCIZ ? SET EXPECTMSG OR TRANSMITMSG=TYPE/SIZE=N OR /COPY=N? 
01251 30009 5 124 HLP3A: .ASCIZ / SET EXPECT=TRANSMIT/ :REV B EC 
012542 0: 5 0131 HLP4: -ASCIZ 2 TYPE=ONES, ZEROES, 1ALT,OALT,ITEP,CCITT ALPHA? 
0 621 0 92 020040 HLP4A: .ASCIZ / OR "OPR SPCD=A-2,5P,TAB,0-9 IN QUOTES''/ 
0126 0 05252 020116 HLPS:  .ASCIZ ? RUN MODE=MTYP/LOOP=LTYP/CHECK, STATUS ECHO, MODEM,PASS=N? 
012767 040 02004 0 11 P6: cASCII / MTYP=TRAN,REC,ACT,PAS,TAL,LIS,DOWN/<15><12> 
013036 020060 046040 054524 "ASCIZ. /  LTYP=INT,CAB,LOC,REM/ 
013066 047065 040445 054524 RHLPO: .ASCIZ /ZNZATYPE 'H'’ OR "2" FOR HELP!/ ;REV B EC 
‘ 124 041504 052114 31040 RHLP1: .ASCIZ /DCLT REPORT CMDS:/ ;:REV B EC 
146 047514 02 107 5 RHLP@: “ASCIZ /LOG = PRINT DCLT EVENT LOG/ ;:REV B EC 
013201 105 044530 020124 RHLP3: .ASCIZ /EXIT - EXIT REPORT LEVEL/ ;:REV B EC 
013232 94291 050114 0 RHLP4: :ASCIZ /HELP = PRINT THIS MESSAGE/ ":REV B EC 
} 3327 33 be 163 333 1S i ; BT Se PT ERRORS” /OFFSET=I6N(O) ? 
013376 047045 04 g 1 5 RPTIV: . PENEADFFSET INVALID/ 
013421 045 16 101 RPTNV: . /ZNZADDCMP COUNTERS VALID ONLY WITH PROTOCOL SELECTED./ 
013507 045 16 501 SHMSG: . 2ENZAMSG: TYPE=ZTZA/SIZE=2D3? 
013543 13 0 517 SHTYPO: . /1EROES/ 
35¢ 711 5 SHTYP1: . 
55 061 01 2 
4 
3 
4 


tot et aed et ed ed ed ed ed ee edad ad adedadad ad ad ad ad od 
PERRI RI RE RI RIRERIRIPEIINIIINIIIINIINIINIINIINIININININIININIRN NRr 
~ 
-4 
~ 


Rnnnnnnnnnnnnnnnnnnnnarnnnrnnea 
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SEQ 71 
St 
CVCLHC.P11 22-MAR i1: GLOBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO 


01 ie 103 1101 2514 LP2: eASCIZ ?CABLE? 

0137 133 Fat 4 I 9} LPS: eASCIZ ?LOCALMODEM? 
1 736 Obs . 7515 524 LP4: eASCIZ ?REMOTEMODEM? 
1377 > PNST: .ASCII /NO/ 

13774 052123 052101 051525 PST: eASCIZ = /STATUS/ 

1400 18 117 PNCK:  .ASCII /NO 
dis 10 062919 045503 PCK: eASCIZ = /CHECK/ 

1401 18 11 PNEC: .ASCII /NO/ 

01401 105 044103 000117 PEC: eASCIZ /ECHO/ 

dps On7aig PNMS: .ASCII /NO/ 

014024 047515 042504 000115 PMS: eASCIZ /MODEM/ 

Det 4 047516 PNPR:  .ASCII / 

14034 051120 052117 041517 PPR: eASCIZ /PROTOCOL/ 
014045 045 oes) 046101 LISP:  .ASCIZ /ZNZALIS>/ 
B1308 046124 03711 OPRMM: .ASCIZ /TLK>/ 

01406 016) 3 044510 020125 15060: foes /THIS A 50. OR 60. HZ. LSI-11:/ 


FORMAT STATEMENTS USED IN PRINT CALLS 


014122 047045 040445 047504 DLLCM: .ASCIZ /ZNZADOWN LINE LOAD NOT SUPPORTED BY THIS DEVICE/ 


014202 047045 040445 O56 10s BDCLK: .ASCIZ /ZNZACLOCK NOT FOUND/ 

oiegse 047045 040445 502 NOCLK: .ASCIZ fp ® CLOCK = PROGRAM WILL HANG ON ‘‘TIMEQUT’'!!/ 
014307 115 054101 020056 TABEX: .ASCIZ a AS6 COUNT EXCEEDED -/ 

014347 106 3125 $ BUFEX: .ASCIZ fe FER FUL =/ 

014365 rhe oe 218 22524 MSGTRN: .ASCIZ /ZN2T nSG. ant BUILT !!/ 

014416 047045 45 0441 ; MSGTRU: .ASCIZ a ry pe Tees BUFF LIMIT - MSG TRUNCATED/ 
014501 045 022516 03252 FO: .ASCIZ +INKS TAMODESSTET TZA/PASS=225? 


014537 045 022516 032523 SHF1:  .ASCIZ ?ENZSSESSESSZA/2TAA/ATLA/ATLA/ZTZA/27? 


014604 051445 465 0521 EFM2: .ASCIZ /ZSSZATOTAL MISMATCHES IN MSG = %D5/ 

01 045 236 315 PCPM:  .ASCIZ /ZNZS3ZACALLED FROM PC=206/ 

01 5 5 EFM11: Astle /ZSSZACOMPARE COUNT =KD5ES sine cele COUNT=205/ 
014756 047515 5 2011 CMS: .ASCIZ /MODEM STATUS C S_FOR THIS PASS WERE../ 

01 051445 022465 4101 EFM135: .ASCIZ /%S5 D CHANGES=ZD5ZAZSSZAGLITCHES=2D5/ 


sEVENT DESCRIPTION MESSAGES 


15101 124 5 Ostet EDTXC: .ASCIZ /TRANSMIT MSG QUEUED/ 
15125 124 5 51516 EDTXC: .ASCIZ /TRANSMIT MSG COMPLETED/ 
15154 0425, § ; 53111 EDRXQ: .ASCIZ /RECEIVE SPACE QUEUED/ 
15201 1 4505 EDRXC: .ASCI ECEIVE MSG COMPLETED/ 
15227 1 53105 1511 EDDER: .ASCI pes vite ERROR/ 
Big 44 rea a Pe 4 M6 EDDCK: .ASCIZ COMPARISON STARTED/ 
15274 2504 6 042505 EDDVI: .ASCIZ 7DEVICE INIT AND SETUP/ 


CVCLHC DPV-11 DATA C LINK TEST 
‘yie AAR Re 1509 


CVCLHC.P1 
15 0405 524 
ag oe 
01 2788 1536 40 


23 
rw 
So 
w 
ak 
-R 


01 5 8 1335 
0154 2 4 
ssh a Sane 
O1328e O45 0 316 
12653 be 02251 
8126 047045 144 
015744 thet: 5144 
015756 05144 24 
01577 045 15 
01601 045 seie 
016117 045 516 
016215 045 022516 
016274 051445 022465 
016357 045 022516 
01640 eth ots 051445 
0164 7045 051445 
01647 130 040 
91630 130 898 
1650 130 04 
oieey 130 040 
1651 1 040 
0165 3 130 040 
0165 130 040 
016533 000 
16534 047045 
1s ost 
tse onthe 
165 § 051445 6st 
Ot 5 03 5 
31g8 05144 24 
1664 045 15 


016660 051445 022463 


Yawn 
= rery S 
2NU 


Te et 0 ee 


wVNse— 


4 


WAY 
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GLOBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO 


SEQ 72 


EDDLE: .ASCIZ /DATA COMPARISON LENGTH ERROR/ 

EDDDE: .ASCIZ /DATA COMPARISON DATA ERROR/ 

EDEOP: oAetts /END OF PASS 

EDMOS: .ASCIZ /MODEM STATUS CHANGE/ 

EDABO: .ASCIZ /*C ABORT/ 

EVENT REPORTING MESSAGES 

BASM3: .ASCIZ sssi0s/ 

ot eASCIZ /283%06/ 

BASM1: .ASCIZ /2NZ06/ 

NULEVT: .ASCIZ /2ZNZATHE OCLT EVENT LOG IS EMPTY/ 

EVTFO: .ASCIZ /2ZNZA>>> ecu EVENT £06 ENTRY <<<<<€6 66666 E666 KK KKK / 
EVTF1: .ASCIZ /2NZDSZA:222%A:2222S52T/ 

EVTF2: .ASCIZ /ZNZS3ZAADDR OF MSG=Z062%S3ZABYTE COUNT=2D5/ 

EVTF35: .ASCIZ /2NZSSZTIN/ 

EVTF3C: .ASCIZ /2S Letter 

EVTF3D: .ASCIZ /2S3206%S5Z062S32T/ 

EVTF4: .ASCIZ /2NZS R OF MSG=Z062%S3ZABYTE COUNT=ZD52S3ZANO. OF CMP ERRS=2D5/ 
EVTF4A: .ASCIZ /2NZS3ZAADDR OF MSG=Z06ZS3ZARX BYTES=ZD5ZS35ZACOMPARE BYTES=2D5/ 


EVTF4B8: .ASCIZ /2NZS3ZAPASS=2D5%S3ZAERRORS=2D52S3ZASTRI-TO=205/ 
EVTFSA: .ASCIZ /%SSZABYTEM IN MSG.=%D5ZS3ZAEXPTD=Z032S3ZARECVD=203/ 
EVMOCG: .ASCIZ /ZNZS9ZACHANGED T0:/ 


g RRRAAARARERRERAARAREREEEEREREAEEERERRAAAEERAERREREERARAEERERRREEREEEREERE 


3D0 NOT SEPERATE THE NEXT LIST OF MESSAGES = MODEM SIGNAL HEADER AND REPORT 
EVMOHD: .ASCIZ /ZNZS8ZAMODEM STATUS: CTS DSR DCD RTS RI SQD TM/ 


EVMOST: .ASCII /2NZS9ZS9ZS52A/ 
EVMCTS: .BYTE  ‘X,40,40,40 
EVMDSR: .BYTE ‘'X,40,40,40 
EVMDCD: .BYTE ‘°X,40,4 48 
EVMRTS: .BYTE  ‘X,40,40,4 
EVMRI: .BYTE  ‘'X,40,40.4 
EVMSQD: .BYTE  ‘'X,40,40,4 
EVMTM: .BYTE 'X,40,40,4 
BYTE 0 
EVEN 
sEXECUTION STATUS MESSAGES TO BE PRINTED TO KEEP OPERATOR AWAKE 
CR: -ASCIZ 3CR FOR_LINES IN A ROW 
STXQ: .ASCIZ /ZS3ZATXQ/ sABOUT TO T 
STXC:  .ASCIZ /ZS3ZATXC/ Tx C ETED 
SRXQ: .ASCIZ /ZS3ZARXQ/ sABOUT TO RECEIVE 
SDVE: .ASCIZ /ZS3ZAERR/ sDEVICE ERROR 
SCA: eASCIZ = /2S3ZACMP/ 3ABOUT TO DO DATA CHECKING OF RECVD VS. EXPTD 
SDVI: .ASCIZ /2S3ZAINI/ sDEVICE ABOUT TO BE INITIALIZED 
SCML:  .ASCIZ /ZS3ZACML/ sCOMPARE LENGTH ERROR 
SCMD: .ASCIZ /ZS35ZACMD/ sCOMPARE DATA ERROR 
SEOP: ry /ESSZAEOP/ 3 END PASS 


SMSC: .ASCIZ /%S3ZAMSC/ sMODEM STATUS CHANGE. 


I 6 
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CVCLHC.P11 22-MAR~82 11: OBAL FORMAT STATEMENTS, MESSAGES, AND ASCII INFO 


016671 115 pest? 046303 GLMSG: .ASCIZ /MODEM STATUS GLITCHED/ 
016717 115 117 HRDMSG: .ASCIZ /MODEM STATUS HARD ERROR/ 


SEQ 73 


J 6 


SEQ 74 
CVCLHC DPv-11., ATA ATA COMM LINK TEST MACY11 30A(1052) one atte 16:43 PAGE 75 
CVCLHC.P11 i1 ORMAT STATEMENTS, MESSAGES, AND ASCII INFO 
016747 15 51501 2524 DVEMO: .ASCII /MASTER RESET DID NOT WORK/ 
01 990 90501 9040 51040 "ASCIZ <15><12>/__ RXCSR—sTXCSR / 
017026 04 1 144 é 14 DVEM1: .ASCII / CLEAR TO SEND FROM MODEM / 
01 00501 2 Q 5104 *ASCIZ. ~<15><12>/.«ORXCSR_—SOTXCSRR 
1711 4524 1 7440 DVEM2: .ASCII TIME guT WAITING FOR RX OR TX TO COMPLETE/ 
17161 015 02001 004 "ASCIZ <15><12>/_—-RXCSR 
017205 105 152 4440 DVEM3: ASCII ICRC N ERROR/ 
017 21 01 2001 2004 "ASCIZ <15><12>/ RDSR RXCSR/ 
017 : iee 150 4505 DVEM4: .ASCII SEAS OVE 
01726 01 2001 2 : SASCIZ Bhek RXCSR/ 
017311 124 651 105 DVEMS: :ASCII /TINED OUT IN START,STACK,ACK SEQ/ 
017351 015 02 1 2 Q *ASCIZ <15><12>/.  RDATA © SDA 
017375 115 ei ‘ 05 DVEM6: .ASCII mod EM DID NOT RETURN MODEM READY/ 
017435 015 020012 020040 *ASCIZ ><12>/ WOXCER XCSR/ 


EVEN 
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GLOBAL ERROR REPORT SECTION 


-SBTTL GLOBAL ERROR REPORT SECTION 


3+ 
Py 


SEQ 75 


+ 

THE GLOBAL ERROR REPORT SECTION CONTAINS MESSAGE PRINTING AREAS 

; USED BY MORE THAN TEST TO OUTPUT ADDITIONAL ERROR INFORMATION. PRINTB 
; (BASIC) AND PRINTX (EXTENDED) CALLS ARE USED TO CALL PRINT SERVICES. 


LIST BEX 

BGNMSG ERR1 sad 

PRINTB #EVTFSA,OFSET,.<B,GOOD>,<B,BAD> ; INDIVIDUAL DATA COMPARE ERROR 
BISB BAD, (SP) 
CLR =(SP) 
BISB GOOD, (SP) 
MOV OF SET, -(SP) 
MOV #EVTF5A, (SP) 
my has 
TRAP C$PNTB 
ADD #12,SP 

ENDMSG 

L10001: 

TRAP  C$MSG 

BGNMSG ERR2 ata 

PRINTB #EFM2, TEMPS sTOTAL DATA COMPARE FAILS ERROR 
my Yes: = (8 
MOV 40 ntSp) 
MOV SP-RO 

ENDMSG : 

110002: 

TRAP CS$MSG 

BGNMSG ERR10 


ERR10:: 
PRINTB #EFM11,R4, TEMPS ;LENGH COMPARISON ERROR 
MOV TEMP3,-(SP) 


nov SEALY o<SP) 
V #8. -(Sh) 

TRAP (C$PNTB 

ADD #10,SP 


ENDMSG 
L10003: 
TRAP CSMSG 


L 6 
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CVCLHC.P11 22-MAR~82 11:09 GLOBAL ERROR REPORT SECTION 


3 











01760 BGNMSG ERR4 
01760 ERR4:: 
1760 PRINTB #EFM13,MHRCNT,MGLCNT :MODEM STATUS CHANGE 
17602 013746 0115 MOV MGLCNT,=(SP) 
17; 13746 0115 MOV MHRCNT ,<(SP) 
9 017612 012746 0150 MOV FM13,=(SP) 
70 017616 012746 00000 MOV (SP 
71 017622 01 MOV SP.RO 
ie 017624 104414 TRAP  C$PNTB 
017 062706 000010 ADD #10,SP 
74 0176 ENDMSG 
75 0176 L10004: 
76 017 104423 TRAP  C$MSG 
78 
3079 
3081 SPRINT THE 2 OCTAL #°S IN TEMP3/4 
3088 017634 BGNMSG ERR13 
5 HA 9 ERR13:: 
017 PRINTB #EVTF3C,TEMP3, TEMP4 
7 017634 013746 006544 MOV TEMP4 ,-(SP) 
3088 017640 013746 006542 MOV TEMP3, -(SP) 
3089 017644 012746 015756 MOV #EVTE SC =(SP) 
3090 017650 012746 000003 MOV (SP) 
3091 017654 01 MOV 
: 017656 104414 TRAP  C$PNTB 
17660 000010 ADD #10,SP 
017664 ENDMSG 
5 017664 L10005: 
309 017664 104423 RAP _— C$MSG 
3098 : 
SPRINT THE 2 OCTAL #°S IN TEMP3/4 
100 + AND THE MESG. WHOSE ADDR. IS IN CONOTM 
10 P 
198 017666 BGNMSG ERR14 
104 017666 ERR14:: 
105 017666 PRINTB #EVTF3D, TEMP3, TEMP4.CONOTM 
106 17 91 746 006550 MOV CONOTM, -(SP) 
107 0176 13746 544 MOV TEMP4 ,-(SP) 
3108 017676 013746 5 MOV TEMP3.-(SP) 
3109 01 12746 01577 MOV ss: @EVTF $D,-( SP) 
110 017706 01274 MOV =. #4, = (SPS 
113 Glz712 01 MOV SP 
He 17714 104414 TRAP  (C$PNTB 
113. 01771 000012 ADD #12.SP 
114 0177 ENDMSG 
115 0177, L10006: 
116 17722 104423 TRAP  C$MSG 
118 017724 EXI7 MSG 


ne 
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CVCLHC.P11 GLOBAL SUBROUTINES SECTION 


-SBTTL GLOBAL SUBROUTINES SECTION 


UE 


THE GLOBAL SUBROUTINES SECTION 7 au THE SUBROUTINES 
;_THAT ARE USED IN MORE THAN ONE TEST 


ono 


- SBTTL CLOCK SETUP SUBROUTINE 





FUNCTIONAL DESCRIPTION: 
THIS SUBROUTINE SETS UP THE CLOCK INFORMATION TABLE FOLLOWING A *'CLOCK’’ 
cae EXECUTED IN THE INITIALIZATION CODE. BUT SINCE THE ‘‘CLOCK*’ CALL 
SAYS NOTHING ABOUT AN LSI-11°S CLOCK, THIS ROUTINE IS ONLY USED IF A 
LINE OR P-CLOCK IS FOUND. 


INPUTS: 
Ri= POINTS TO SUPERVISOR SPACE WHERE CLOCK INFO WAS RETURNED 
R2= POINTS TO “‘CLK’’ TABLE WHERE CLOCK INFO WILL BE KEPT 


IMPLICIT INPUTS: 
THE SUPERVISOR SPACE WHERE CLOCK INFO WAS RETURNED BY THE ‘‘CLOCK** CALL 


OUTPUTS: 
CLKCSR" GETS LOADED WITH THE CLOCK'S CSR ADDRESS 


VECTOR 
**CLKHZ"* es LOADED WITH THE LINE 4 (HERTZ TRATED WHICH DETERMINES 
THE NUMBER OF TICKS IN A SECOND 


ee Te ee ee 


CALLING SEQUENCE: 
JSR PC,CLKSET sCALL CLOCK SETUP WITH R1 & R2 SETUP 

1 CLKSET: 
177 MOV Cat ys (Rg3* sLOAD CLOCK*S CSR ADDR. INTO “‘CLKCSR®* 
1 MOV (R1)+, (R2) sLOAD CLOCK’S INT. LEVEL INTO ° 
1 ASL (R2) ADJUST THE INT. LEVEL FOR LOADING INTO 
Aer Ag = ; ; THE PSW WITH A ‘SETVEC™ CALL 
1774 ASL (Re) 
177 ASL (Re)+ 
177 MOV (R 30 (Reis sLOAD CLOCK'S INT. VECTOR INTO **CLKVEC’ 
Ae a a + LOAD CLOCK'S HERTZ RATE INTO “CLKHZ' 





SESSA A AAAS SS ASS SASS A aaa eases 
SELSARERAS SULUTUNAS SSL UROL SSBIS GRAS 
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SEQ 79 
CVCLHC DPV-11 DATA COMM. L NK TEST MACY11 30A(1052) 23-MAR-82 16:43 PAGE 80 
CVCLHC.P11  22-MAR=82 11: CLOCK SETUP SUBROUTINE 
3170 
14 -SBTTL CLOCK INTERRUPT SERVICE ROUTINE 
17 : "FUNCTIONAL DESCRIPTION: 
174 ; HIS IS THE CLOCK INTERRUPT T SERVICE ROUTINE WHICH TAKES CARE OF 
175 : KEEPIN 6TH E 'TIME-SINCE-S D COUNTING DOWN ANY OF 
176 : EVENT’: TIMERS. THE WIRERS. A ARE USED TO TIME COMPLETION OF DEVICE 
177 : REQU eeTs. THE “"TIME*SINCE=START’’ IS USED TO BE LOGGED WITH EACH ENTRY 
3178 : INTO THE EVENT LOG. 
180 : IMPLICIT INPUTS: 
181 ; TIMTCK: i SEEN coun OF TICKS LEFT TO BE COUNTED UNTIL A SECOND 
3183 : CLKH OF TICKS IN A SECOND, DETERMINED 8 BY, THE SYS. LINE FREQ. 
184 : cae 2 Tinset: CURRENT VALUE OF ''TIME-SINCE-S 
185 ; NUTES & SECONDS F 
3186 ; TIMER 1,2, & S: CURRENT VALUES OF THE “EVENT TIMERS 
sige ; IMPLICIT OUTPUTS: RN 
189 : NEW VALUE OF EVENT TIMER ‘11'' DECREMENTED BY 1 TICK IF IT WAS NON-ZERO 
3190 : NEW VALUE OF EVENT TIMER ‘'2' DECREMENTED BY 1 TICK IF IT WAS NON-ZERO 
3131 : NEW VALUE OF EVENT TIMER ''S DECREMENTED BY 1 SECOND IF IT WAS NON-ZERO 
3193 : FUNCTIONAL SIDE EFFECTS: 
3194 ; THE CLOCK IS DISABLED UPON ENTRY AND REENABLED WHEN LEAVING 
3196 : CALLING SEQUENCE: 
3197 : HIS ROUTINE IS CALLED WHEN THE CLOCK INTERRUPTS THRU ‘‘CLKVEC'’. 
3198 : THE ADDRESS OF THIS ROUTINE WAS LOADED INTO THE CLOCK'S INTERRUPT 
3199 : VECTOR WITH A SUPERVISOR ‘’SETVEC’ CALL. 
3509 
320 017754 BGNSRV CLKINT 
3205 017754 CLKINT:: 
3205 017754 005077 166640 CLR @CLKCSR :DISABLE THE CLOCK FORM INTERRUPTING 
3206 017760 005337 006636 DEC TIMTCK *DECREMENT THE # OF TICKS/SEC 
7 017764 00101 BNE 1$ *G0 CHECK TIMERS (182-TICKS, 3-SECONDS) 
017766 013737 006626 006636 MOV CLKHZ2,TIMTCK :RESET THE # OF TICKS/SEC. 
017774 005237 0066 INC TIMSEC SINC # OF SECS-SINCE-STAR 
3310 0 0227 7 74 006634 CMP #60., TIMSEC *SEE IF WE'VE COUNTED 60 Secs. YET 
11 020006 001004 BNE 1$ SIF NOT, GO CHECK TIMERS 
1g 020010 005237 006632 INC TIMMIN t ELSE INC MINUTES-SINCE-START 
13 020014 005037 34 CLR TIMSEC : iN RESTART SECOND COUNTER 
aE 020020 005737 006640 1$: TST TIMER1 :SEE | F TIMER #1, TIMING ANYTHING 
if 4 1408 BEQ 2$ ; HING BEING TIMED CHECK NEXT TIMER 
1 5337 00664 DEC TIMER? : dt se * DECREAENT THE TIMER VALUE (BY 1 TICK) 
18 0200 5737 00664 2$: TST TIMER2 ; SEE IF TIMER #2, TIMING ANYTHING 
19 =0, NOTHING BEING TIMED CHECK NEXT TIMER 
2 TIMER2 s DECREMENT THE TIMER VALUE (BY 1 TICK) 
4 TIMERS F TIME TIMING ANYTHING 


NOTHING BEING TIMED, LEAVE 
F A SECOND HAS BEEN COUNTED OFF 


NO 
DECREMENT THE TIMER VALUE (BY 1 SEC.) 


Soooceco 
sss 
& 
WWS 
ANP 
ww 
ioe) 
=~coW 
wmm 
+Oo 
Sete Ge Be Be Sete Se 
wn 
Me Mrne 
eS 
Mm—— Omen 


3 ss 3737 006626 006636 a4 Teen 
25 03 4895 006644 DEC TIMERS 


cvc 
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CVCLHC.P11 22-MAR- 


3356 


33 


6 020066 013777 006630 166524 4$: 
020074 


8 020074 
29 020074 000002 


CLOCK INTERRUPT SERVICE ROUTINE 
MOV CLKEN,@CLKCSR ;REENABLE THE CLOCK TO INTERRUPT 


ENDSRV 
10007: 
RTI 


SEQ 80 


. 7 


JSR PC ,LOGCMP 


SEQ 81 
CVCLHC DPv-11, ATA, COMM. LINK TEST MACY11 30A(1052) 23-MAR-82 16:43 PAGE 82 
CVCLHC.P11 2 11: T LOG SUBROUTINES 
.SBTTL EVENT LOG SUBROUTINES 
¥ FUNCTIONAL DESCRIPTION: 
; THIS SUBROUTINE HAS A DIFFERENT ENTRY POINT 
5 : FOR EACH EVENT TO BE LOGGED AND ALWAYS PRINTS 
: THE SHORT ‘OPERATOR AWAKE’ MESSA CE TO CONSOLE THEN LOGS THE 
: EVENT TYPE, TIME, AND THE OTHER 3 WORDS OF INFO PASSED TO THE 
38 F SUBROUTINE AT CALLING TIAE 
40 : INPUTS: 
41 : TIMMIN & TIMSEC: CURRENT VALUE OF ‘‘TIME-SINCE-START'’ 
4g : TEMP2: WORD #1 OF EVENT LOG INFORMATION (FOR MOST EVENT TYPES) 
324 : TEMPS: WORD ‘ OF EVENT LOG INFORMAT ION 
4a : TEMPS: T LOG INFORMATI 
3245 : MODS: CORRENT GALLE OF THE MODEM SIGNALS AVAILABLE FROM THE DEVICE 
see : OUTPUTS: 
48 : "OPERATOR AWAKE'’ MESSAGE SENT TO THE CONSOLE 
49 : NEW EVENT LOGGED IN ‘EVTLOG' (EVENT LOG) 
3529 ; UPDATED “EVTPTR'’ (EVENT LOG ENTRY POINTER) 
325¢ ; SUBORDINATE ROUTINES USED: a 
325 : ‘DVMODS'' THE DEVICE SUBROUTINE THAT RETURNS MODEM STATUS IN ‘MODS 
3394 ; (FOR SOME EVENT TYPES) 
3256 3 FUNCTIONAL SIDE EFFECTS: 
3257 : TEMP: USED TO STORE ADDRESS OF “OPERATOR AWAKE'* MESSAGE 
3525 : TEMP1: USED TO SETUP THE VALUE OF THE “EVENT TYPE'’ 8YTE FOR LOGGING 
60 + CALLING SEQUENCE: 
61 : JSR PC,LOGTXQ ;CALL THE LOG EVENT SUBROUTINE WITH TEMP, TEMP1, 
: : TEMP2, TEMP3, AND TEMP4 SETUP 


LOGTXQ: 
016537 006536 MOV #STXQ, TEMP1 :SET UP MSG. TO PRINT 
000000 006534 MOV #TXQ, TEMP *SET UP EVENT TYPE 
BR LoGsi :G0 LOG EVENT AND TIME 
LOGTXC: 
016550 006536 MOV #STXC, TEMP1 :SET UP MSG. TO PRINT 
000002 006534 MOV #TXC, TEMP [SET UP EVENT TYPE 
BR LoGsi 60 LOG EVENT AND TIME 
LOGRXQ: 
16561 0065 MOV #SRXQ, TEMP1 sSET UP MSG. TO PRINT 
ita 6 MOV #RXQ, TEMP SSET UP EVENT TYPE 
BR LOGS! 60 LOG EVENT AND TIME 
LOGRXC: 
000006 006534 MOV #RXC, TEMP :SET UP EVENT TYPE 
LoGsi +60 LOG EVENT AND TIME 





LGDVE: 
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LOGDVI: 


LOGCMP: 


LOGCML : 


LOGCMD: 


LOGEOP: 


LOGMSC: 


LOGS1: 
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LOGS3: 
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30A(1052) Ce ite Pa 43 PAGE 83 
EVENT LOG SUBROUTINE 


#SDVE, TEMP1 
#DER, TEMP 
LoGs$ 

#spVi TEMP1 
MODTYP, TEMP2 


MLTYP, Bi 
RASS 


#SCM, TEMP 
#DCK. TEMP 
LOGS3 
#SCML, TEMP1 
#DLE, TEMP 
LOGSs3 
#SCMD, TEMP1 
#DDE, TEMP 
LOGS3 
#SEOP, TEMP1 
#EOP, TEMP 
LOGS3 


#SMSC, TEMP1 
#MSC, TEMP 
LOGS3 


ERRCNT ,~(SP) 


(SP)+,R4 
Re -ERRCNT 


LOGEX 
MODS , TEMP4 


onae TEMP 
#STATB,PARAM 
LOGS5 


#10 LNCNT 
LOGS 
LNCNT 


3SET UP MSG. TO PRINT 
7SET UP EVENT TYPE 
760 LOG EVENT AND TIME 


3SET UP MSG. TO PRINT 
3SET UP EVENT TYPE 


3SET UP EVNT ENTRIES 
360 LOG EVENT AND TIME 


3SET UP MSG. TO PRINT 
;SET UP EVENT TYPE 


3SET UP MSG. AND TYPE 
760 LOG EVENT AND TIME 


G0 LOG MSG TYPE AND TIME 


3:G0 LOG MSG TYPE AND TIME 


:SAVE CURRENT ERROR COUNT 

: GO GET MODEM STATUS 

3GET SAVED ERRCNT VALUE 

; E ANY ERRORS FOUND 

; : ELSE LEAVE WITHOUT LOGGING ANYTHING 
BUT THE D E LERROR F ROM 'DVMODS': 

SAND SUT TE IH TERE 


:1F RXC DONT PRINT 
é1F NO STATUS SELECTED 
HAVE WE DONE 10? 


SIF NOT GO TO 4 
sESLE CLEAR IT 


SEQ 82 


:.# 


SEQ 83 
CVCLHC we ATA oS a B LANK TEST MACY11 a a nn ie Pa 43 PAGE 84 





CVCLHC.P11 T LOG SUBROUTIN 
40 PRINTF #CR sELSE PRINT CR 
0 012746 016534 MOV #CR,-(SP) 
4 012746 ita MOV #1,-(SP) 
Q 1 MOV SP; RO 
10441 TRAP  CSPNTF 
4 000004 roe ADD #4 ,SP 
60 005237 006500 INC LNCNT sINC COUNTER OF # OF AWAKE MSGS 
0 PRINTF TEMP? [PRINT OPERATOR AWAKE MSG. 
0 or 746 006536 mov TEMP1,-(SP) 
12746 000001 MOV #1,-(SP) 
74 010600 MOV SP 
020476 104417 TRAP  CSPNTF 
020500 706 000004 ADD #4,SP 
5 504 01034 LOGSS: MOV R3,-(SP) :SAVE R3 ON THE STACK 
58 306 013703 006646 MOV EVTPTR,R3 
3 59 512 1137 534 MOVB «TEMP, (R3)+ :LO0G EVENT 
516 0137 6 006534 MOV CLKHZ, 
1 020524 163737 006534 SUB TIMTCK, TEMP 
020532 1137 0065 MOVB (R :L0G TIME SINCE START 
020536 11 MOVB =‘ TIMSEC, (R3)+* 
364 020542 1137 2 MOVB TIMMIN.(R3)+ ;TICKS,SECS AND MINS. 
5 020546 013723 006540 MOV TEMP2, (R3)+ [LOG EVNT ENTRY 3 
366 02055 gt 723 006542 MOV TEMPS, (R3)+ [LOG EVNT ENTRY 4 
367 0205 13723 006544 MOV TEMPS (R )+ ‘LOG EVNT ENTRY 5 
3368 020 020327 007552 CMP ,MEVTEND 
369 020566 1034046 BLO LOGS2 :IF EVENT LOG FULL GO 
*CONTINUE;ELSE GO TO 2 
1 020570 012713 177777 MOV #1 (R3) [LOG AT. 
37¢ 020574 012703 006650 MOV #eV VTLOG [PUT R3 TO START OF TABLE 
0 9105 006646 LOGS2: MOV R veers SRESTORE POINTER 
374 0 12603 MOV (SP)+,R3 RESTORE R 
373 0 000207 LOGEX: RTS PC 
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CVCLHC “11 whe COMM. LARK TEST MACY11 30A(1052) 23-MAR-82 16:43 PAGE 85 
CVCLHC.P11 22-MAR-82 11: REPORT EVENT LOG 


77 .SBTTL REPORT EVENT LOG 
a ::DPV DCLT PROGRAM 
*:RPT> LOG 
33 HELP 
1 33 EXIT 
COUNTER/FULL ERROR, OF F SET=NN(0) 
5 


MOV sets 3SAVE R2,R3,R4 ON THE STACK 
MOV R5,~(SP) 


$55 


MOV R4,-(SP) 


7 -PRINT HELP MESSAGE 
+ PRINTF #RHLPO :BASIC HELP MESSAGE 
sRHLPO,=(SP) 


oocoeooe 
—— 


; 


GETRCL: CLRB PSGDBD INIT GOOD/BAD FLAG <-1=BAD INPUT 
CLRB PSNNUF sINIT MORE COMMAND LINE INPUT NEEDED 


Ww 


SRLFGRAVLSSES 
i 


zPRINT PROMPT ‘RPT>' 
GMANID CLISRP,CMDBUF ,A,~-1,1,72.,NO 


ooo 


#CMDBUF ,PSBUFA s INPUT BUFFER 
ACLIRT PSTREE sREPORT CLI TREE 
#CLIRAC ,PSACT SACTION ROUTINES 


PC PSTRV 360 PARSE COMMAND LINE 
P$GDBD A aed OK ? 


YES ,BRANCH 
PRINT INVALID INPUT — 


20650 000406 
065 

020654 M 

0 011 

0 1 

0 000001 

0 000110 

0. 01 

020674 01 

020702 Ot 

0 5 

0 


eld 
7 
737 
037 
7 
7 
2 


33 


— 
So 
Wh 


1$ 
#CLIERM 


ab a ed ae a at ed 


MFEWN =O OBNOUSWN—O 
Oooo 


Sssssess 


RAIESE 


gssee 
sees 


#CLIERM, -(SP) 
#1,-(SP) 


e 


S$P;RO 
CSPNTF 
#4,SP 


a oe s 


rm 


BS 
Ss 


GETRCL :TRY AGAIN 

PSNNUF :MORE COMMAND NEEDED ? 
10$ NO, BRANCH 

#CLINUF S INCOMPLETE MESSAGE 


JS NN 
it} 
— 

83 

=a 

ON 


#CLINUE (SP) 
#1,-(SP5 


SP-RO 
CSPNTF 
#4,SP 
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REPORT EVENT 


10$: 


20S: 


JMP 


GETRCL 
ee 


3TRY AGAIN 


SEQ 85 


ss. 





SEQ 86 
CVCLHC DPV-11 DATA. COMM LINK TEST MACY11 30A(1052) 23-MAR-82 16:43 PAGE 87 
CVCLHC.P11 i1: COMMAND LINE PARSING TREE FOR REPORT 
.SBTTL COMMAND LINE PARSING TREE FOR REPORT 
9 1030 CLIRT: CLI CLISPA,0,R10$ :$KIP SPACES, IN COMMAND LINE 
10 R10$: CLI <'?>,RPHLP,R11$ SIF INPUT a THEN PRINT" HELP MESSAGE 
45 02104 CLI CLIEXI,O “AND EXIT 
46 9 104 R11$: CLI CLISTR.RPHLP,R12$,<"HELP'> *1F INPUT = whee THEN PRINT HELP 
105 CLI CLIEXI,O t:MESSAGE AND EXIT PARSER 

8 9 1 R12$: CLI CLISTR.RPEXT,R13$,<"EXIT’> IF INPUT = EXIT’ THEN SET KEYWORD = 
9 021074 CLI CLIEXI.O 3¢RPEXT AND EXIT PARSER 
50 021076 R13$: CLI CLISTR.RPLOG,R14$,<'LOG'> iF INPUT = "LOG* THEN GO PRINT EVENT 
51 02111 CLI CLIEXI, ;LOG AND EXIT PARSER 
38 9 111 R14$: CLI CLISTR TNF .R30S, <' COUNTERS >; 6 INPUT = COUNTERS 
5 11 CLI CLIBR,O.R s THEN GET SWITCH 
54 0 1136 R20$: CLI <'/> RGF 33 
55 0 114 cL cLISR, at R21$,<"ERROR'> :: REPORT ERROR COUNTERS 
37 0 1168 R21$: cL CLISTR. “RPFUL,R22$,<"FULL'> ;;REPORT ALL STATUS 
59 021176 R22$: CLI CLISTR.RNOTNF ,R30$,< ‘OFFSET'S:: REPORT ONE LOCATION 

021214 CLI <"=>,0.R30 
1 021220 CLI cLiocT. RPSWO,R30$ 3 

031 4 CLI CLIEXI. 

021226 R30$: CLI CLIERR. 

0212 R125$: CLI CLIEXI.O 


J 7 


SEQ 87 
CVCLHC DPV-11 DATA COMM. LINK TEST MACY11 30A(1052) 23-MAR-82 16:4 43 PAGE 88 
CVCLHC.P11 22-MAR-82 11: CLI ACTION DISPATCHER AND ROUTINE 
.SBTTL cL ACTION DISPATCHER AND ROUTINES 
1 2 006 CLIRAC: A Re :SET UP INDEX 
1 1 021250 nov 10$(R2) ,R2 3 
1240 021250 ADD #10$,R2- 
9 1064 71 JSR PC, (Re) £60 DO ACTION 
124 0 RTS PC RETURN 
02125 10$:  .WORD ACTRNL-10$ NULL 
02125 "WORD ACTRHL-10$ HELP ROUTINE 
021254 4 "WORD ACTREX-10$ SEXIT ROUTINE 
021 104 "WORD ACTRLG-10$ SREPORT EVENT LOG ROUTINE 
021 900142 “WORD ACTERR-10$ TERROR COUNTERS ONLY 
1 00012 "WORD ACTFUL=10$ TALL COUNT 
021264 000020 "WORD ACTRNF=10$ [MORE COMMAND NEE 
021266 000164 “WORD ACTRSO-10$ SVALIDATE OFFSET 


sisse sACTION ROUTINES FOR REPORT:::;; 
021270 113737 177777 003146 ACTRNF: MOVB 1, PSNNUF :SET "MORE COMMAND'' NEEDED 
021276 000207 ACTRNL: RTS PC NULL 







:PRINT HELP MESSAGE 
5 021300 012702 003036 ACTRHL: MOV #RHLPTB,R2 s INDEX FOR HELP MESSAGES 
86 021304 1$: PRINTF #HLPF, (R2)+ ‘PRINT IT 
7 021304 012246 MOV (R2)+, ~($P) 
88 021306 012746 012273 MOV #HLPF ,-(SP) 
021312 012746 000002 MOV #2,-(8P) 
90 021316 01 MOV SP.RO 
91 021 10441 TRAP  CSPNTF 
4 021322 0627 900006 ADD #6,SP 
93 0 1326 020227 00305 CMP R2,#RHLPEN ZLAST MESSAGE ? 
94 021332 001 BNE 1$ ; CH 
95 021334 012737 000001 003010 MOV #RPHLP,KEYWD1 SET KEYWORD 
% 021342 000207 RTS PC SRETURN 
98 :EXIT REPORT LEVEL 
99 021344 012737 000002 003010 ACTREX: MOV WRPEXT.KEYWD1 ;SET KEYWORD AND RETURN 
200 021352 000207 RTS PC 
50 :PRINT ERROR LOG 
50 1354 004737 022056 ACTRLG: JSR PC REPLOG 360 PRINT EVENT LOG 
504 021360 012737 000003 003010 MOV #RPLOG,KE *SET KEYWORD 
306 021366 207 RTS gRET 
50 *REPORT ALL MESSAGE AND ERROR COUNTERS 
508 921370 O12 7 037250 ACTFUL: MOV #0 FIR :STARTING INDEX 
509 021376 012737 7266 MOV LAST SLAST INDEX 
510 021404 904 7 02154 JSR PC, STAPRI [G0 PRINT IT 
312 021410 207 RETURN 
51 “PRINT ONLY DDCMP ERROR COUNTERS 
514 02141 12 7 14 037250 ACTERR: MOV HG.FIR :FIRST ERROR 
515 0214 12737 36 037246 MOV AST *LAST ERROR 
316 14 737 02154 JSR PC, STAPRI :GO PRINT IT 
51 14 207 RETURN 
219 
520 zs VERIFY OFFSET VALUE 


kK 7 


CVCLHC_DPV-11_ DATA COMM. LINK TEST MACY11 30A(1052) 23-MAR-82 16:43 PAGE 89 
CVCLHC.P11 22-MAR-82 11: CLI ACTION DISPATCHER AND ROUTINES 


ACTRSO: CLRB F :CLEAR "NOT ENOUGH FLAG’ 
BIT 21S IT ODD ? 
YES BRANCH 
*NEGATIVE # ? 
BM YES BRANCH 
000036 CMP S INDEX LARGER THEN 36 ? 
0$ 3s YES BRANCH 
037250 "STARTING INDEX 


142 037246 P SLAST LOCATION 
02154 PC, STAPRI SPRINT SINGLE LOCATION 


BR 3 3EXI 
: PRINTS #RPTIV : INVALID 
013376 ARPTIV,-(SP) 
000001 #1,-(SP) 
SP,RO 


003142 


Bae 
Ww 
= Ono 
sese 
ae 
Www 
NO 


So 

m 
3 
UNNN 


ro 
or 


PAPA AMAMIUIV 
fe*) 


ror 


eS 
=-oooe 
ot a 
a 
ano 


PITA 
wor 

_ 

on 


wi 
_ 
SOOO SCOoOoOSOoOoOoSooOoO 
_ 
- 


Porononeny 
SSRNSRO 
ANNs 

s > 

N 


177777 MOVB #-1,P$GDBD 3SET BAD DATA _FLAG 
30$: RETURN sOFFSET OK = EXIT 


para Sete 
S 
3 


ae 
Ssss 
riers 


So 


:; PRINT ROUTINES 
STAPRI: MOV =—-R1,,=( SP) sSAVE R1 
000040 BIT #PROTOB,PARAM ;''/PROTOCOL"* SELECTED? 


3 YES BRANCH 
#RPTNV 3"‘VALID ONLY WITH PROTOCOL SELECTED” 


WANNAANAWW 


013421 #RPTNV,-(SP) 
000001 ) 


FEF 
co 


SBVRUF WIA OO 


wi 


000004 


BR 20$ EXIT 
37250 5$: FIR,R1 ;FIRST INDEX 
7146 037252 : STALST “MESSAGE ADDRESS 
7046 037254 PR DATA :MESSAGE DATA 
@STAIND(R1) ;JUMP TO PROPER PRINT ROUTINE 


[BUMP INDEX 
037246 MP Ri TALL MESSAGES PRINTED 
BR 10$ SPRINT NEXT MESSAGE 
208: RESTORE R1 


SOSCSOHOSooO 
SERNETES 


nm 
aS 
ob 
& 


MVM JIU 


ee eh kh ed 


3; PRINT WORD LOCATION 
PRIW: PRINTS MES,MESDATA 3PRINT WORD LOCATION 


13746 037254 MESDATA,-(SP) 
13508 03735 MES. (SB) af 
ig at” 
0441 CSPNTS 
083708 000006 #6,SP 

RETURN 


SEsaaraees 
FEE | BERENS 


SSNS 
earants 
SSLSLSQ8q 


St 


SERRE 


33 PRINT TWO BYTES OF DATA 





abenan-b2 11:09" 


BSZS 


WNW 
-—o SRAvLS3 
SSSSSSSss 

5 N x 

ERR rp 


wr 
Ss 


B38 
as 


22 oe 
ODONAUSE 


36 
36 


MACY11 30A(1052) 23-MAR-82 16:43 PAGE 90 
CLI ACTION DISPATCHER AND ROUTINES 


PRIBB: PRINTS MES,<B,MESDATA>,<B,MESDATA+1> 


RETURN 


3; PRINT SPECIAL _BYTE MASK 
: CLR TEMP 


PRIBS 


10$: BITB 


208: BITS 


NC TEMPS 3 IT 
30$: PRINTS MES,<B,MESDATA>,<B, TEMP1>,<B, TEMP2>,<B, TEMP3> 


RETURN 


TEMP. 

48170 ,MESDATA+1 
10$ 

TEMP1 3s 
#B1T1,MESDATA+1 ; 
20$ ; 


os 
#81T2 ,MESDATA+1 
30$ 





SEQ 89 


=(SP) 
is | cana 
MESDATA, (SP) 


MES. (SP) 
#3,-(SP) 
SP-RO 


CSPNTS 
#10,SP 


=(SP) 
TEMPS, (SP) 
-(SP) 
TEMP? (SP) 
=(SP) 

TEMP, (SP) 
MESDATA, (SP) 
o7 (SP) 

#5,-(SP) 
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SEQ 9C 
CVCLHC DPV-11 DATA COMM. LINK TEST MACY11 30A(1052) 23-MAR-82 16:43 PAGE 91 
CVCLHC.P11  22=MAR-82 11:09 DUMP EVENT LOG 
9 .SBTTL DUMP EVENT LOG 
4 922056 919 46 REPLOG: MOV Re. »= (SP) sSAVE R2,R3,R4 ON THE STACK 
4 0 969 010346 MOV -(SP) 
> 022 010446 MOV R4,=(SP) 
7 
8 
013702 006646 MOV EVTPTR,R2 sMAKE R2 A POINTER TO EVENT TABLE 
237 50 177777 CMP EVT LOG #1 TSEE IF EVENT TABLE IS EMP 
001034 BNE RPT ‘BR IF NO 
PRINTS #NULEVT SIF EMPTY TELL OPRERATOR. 
012746 015507 MOV #NULEVT,-(SP) 
012746 000001 MOV #1,-(SP5 
01 MOV SP,RO 
104416 TRAP  C$PNTS 
062706 000004 ADD #4,SP 
000137 023004 JMP ENDEVT yAND END 
162702 000012 RPT: SUB #12,R2 :NOW POINT BACK TO TOP OF ENTRY U 
+ JUST PRINTED 
020227 006650 CMP R2,#EVTLOG sPOINTING TO TOP OF EVNT LOG QUEUE? 
001010 BNE RPT1 : 
012702 007552 MOV #EVTEND R2 *SET R2 TO POINT TO BOTTOM OF LOG 
02622? 177776 177777 CMP -2(R2) ,#=1 
001007 BNE aPTO :IF END OF LOG IS NOT EMPTY 
000137 023004 JMP ENDEVT SCONTINUE...ELSE EXIT 
920237 006646 RPT1: CMP R2.EVTPTR TARE WE BACK TO POINT™?? 
1002 BNE RPT SIF NOT CONTINUE 
000137 023004 JMP ENDEVT TIF SO EXIT.... 
162702 000012 RPTO: SUB RB :POINT R2 TO START OF ENTRY 
RPTAA: PRINTS A [PRINT EVENT ENTRY HEADER 
012746 015547 MOV HeVTEO -(SP) 
or 746 000001 MOV fl. ) 
15068 MOV 
104416 TRAP Si 
706 000004 ADD 
1 MOVB = (R2) +, R3 :PUT EVENT TYPE INTO R3 
11 00764 MOVB (R2)+.EVTTCK 
i 764 nove R i “EVTSEC :PUT EVENT TIME (TICKS,SECS.MINS IN TEMP LOC.S) 
PRINTS SETH EVTAIN. EVTSEC EVTTCK EVTLST(R3) :PRINT EVENT TIME AND DESCRIPT. 
01 346 761 MOV EVTLST(R3) .~(SP? 
13746 00764 MOV EVTTCK,-(SP) 
137 764 MOV EVTSEC.-(SP) 
13748 O1566 Mov EVITA =tSP) 
iss m But 
04416 TRAP  CSPNTS 
062706 000014 ADD #14,SP 





N 7 





SEQ 91 
CVCLHC DPV-11 BATA, COM COMM, it NK TEST MACY11 30A(1052) 23-MAR=82 16:43 PAGE 92 
CVCLHC.P11 DUMP EVENT LOG 
76 022272 000173 007656 JUMP @RPTDSP(R3) sDISPATCH TO DECODING SECTION FOR SPECIFIC TYPE 
8 0 7% 01 37 00765 RPTTXQ: MOV (R2)+,EVTADD STORE MESSAGE ADDRESS FOR {PRINTING 
12237 00765 MOV (Ro) +, EVTBCT i STORE BYTE COUNT TING 
9 12203 MOV (R2)+.R "STORE MODEM SyATUS FOR PRINTING 
1 1 PRINTS HEVTFS. EVTADD,EVTBCT | ;PRINT ADDR,BYTE CNT 
022310 013746 00765 MOV EVTBCT,-(SP) 
Bale lars Bice a 
5 855 4 012746 $0080 MOV ,~(SP) 
10600 MOV 0 
04416 TRAP CS$PNTS 
062706 000010 ADD #10,SP 
02 0 004737 023014 JSR PC, RPTMSB :G0 PRINT MODEM STATUS 
30 2 000137 022124 JMP RPT :GO BACK FOR NEXT EVENT ENTRY 
% 022350 01 37 007654 RPTDER: MOV (R2)+,EVTTMP § GET ADDRESS OF DEVICE INFO MESSAGE 
95 i 54 oI 3 90770 MOV (Re) )+ + DEVI SSTORE DEVICE REG CONTENTS FOR PRINTING 
95 22364 PRINTS setts? EVTITMP ;PRINT DEVICE REG CONTENTS. 
9% 02 13746 007654 MOV EVTTMP,-(SP) 
97 0 370 12746 015744 MOV fe. 3b) *=(SP) 
98 022374 012746 2 MOV 
99 022400 01 MOV RO 
700 9 402 104416 TRAP eSBNTS 
701 404 062706 000006 ADD 46,SP 
022410 PRINTS #EVTF3C,DEV1,DEV2 
70 9 410 013746 007710 MOV DEV2.~<SP) 
oN 0 436 1 rie 7706 HOV meviF ac tsp) 
706 9 <3 1874 b00008 mov Nt 
TB HERE ISHS coon & ie 
05 440 $007 022124 JUMP RPT 760 BACK FOR NEXT EVENT ENTRY 
444 005037 RPTDVI: CLR DEV 
450 i 7 Me , 08 CLR DE 2 ICLEAR UPPER BYTES OF DEV! & DEV2 BEFORE USE 
454 112237 0077 MOVB = (R2) +, DEV SSTORE SETUP OPERATION PARAMETERS FOR PRINTING 
460 11 771 MOVB  (R2)+.DEV 
464 1 o71 MOV (R2)+,DEV 
4 1 771 MOV (R2)+ DEV 
474 01 MOV R2,-(§ :SAVE R2 ON THE STACK 
47 023712 JSR PC [G0 PRINT MODE, MAINT-LOOP TYPE, PARAMTERS. 
1 3 MOV (SP) +,R2 SRESTORE R2 
022124 JMP RPT [G0 BACK FOR NEXT EVENT ENTRY 


igreneat END OF PASS OR *C ABORT 

76 RPTEOP: MOV (R2)+, vreer 
8 MOV (Ro)+, A 
MOV (R2)+ EVI TAP 

ar ss PRINTS M#EVTFSB ,EVTADD EVTBCT EVI TMP 3PRINT ROCA FUN TES OV OTTES. 


MOV EVIect.~ -(SP) 
MOV VTADD.~(SP) 


PUA A AAA 
= 





FSi eS aR Cele oP ter AAS a oO BS ee ae 


CVCLHC DPV-11_ DATA mn it NK TEST 
CVCLHC.P11 22-MAR-82 


2 022540 012746 nerd 
7 544 4 746 000004 
7 0995 55 1 

735 Sse 552 104416 

ie] 0 062706 000012 
738 022560 000137 022124 
139 

740 

741 022564 012237 007650 
742 022570 012237 007652 
743 022574 012237 00765 
744 Bss608 

3745 022600 013746 00765 
3746 022604 013746 007652 
3747 022610 013746 007650 
3748 022614 012746 016015 
749 022620 012746 

750 ascoce 010600 

3751 022626 104416 

3752 022630 062706 000012 
ey, 022634 000137 022124 
3755 022640 

756 022640 012237 007650 
757 022644 012237 00765 
3758 022650 012237 007654 
3759 022654 

3760 022654 013746 007654 
3761 022 013746 007652 
762 022 013746 007650 
763 022670 012746 016117 
764 022674 012746 

765 055708 010600 

3766 022702 104416 

3fer 022704 062706 000012 
3769 022710 000137 022124 
3770 

‘ 

774 

775 022714 012237 007654 


14 

022720 

022720 013746 

0227 Do 746 

02 16/08 000002 
0 re ens 


at 
227. 


023014 


E85 





012746 
012746 





84 
78 
78? 





SEQ 92 


MACY11 a phi fine’. 16:43 PAGE 93 


RPTDDE: 


RPTDLE: 
RPTDCK: 


RPTMSC: 


DUMP EVE 


JMP RPT 


MOV (R2)+, Abe 
MOV (Ro) + EV BCT 
EVTTMP 


MOV 
PRINTS 


JMP RPT 


MOV (R2)+,EVTADD 
MOV Agee AE a 
MOV (R2)+,E 

PRINTS 


JMP RPT 


MOV (R2)+, EVTTMP 
PRINTS #EVTFS,EVTTMP 


(R2)+,R3 
JSR PC .RPTMSB 
PRINTS M#EVMOCG 


(R2 
settee EVTADD,EVTBCT,EVTTMP 


:S 
wevTRaAS EVTADD, EVTBCT EVTTMP 


MOV #EVTF4B 

MOV #4,-(SPS 

MOV SP,RO 
CSPNTS 


ADD #12,SP 


-(SP) 


3THEN GO GET NEXT EVENT ENTRY 


STORE MESSAGE ey FOR PRINTING 
ZSTORE BYTE COUNT FOR PRINTING 
:STORE TOTAL # OF CMP ERR 


ORS 
3PRINT ADDR, BYTE CNT, # CMP ERRS 
MOV EVTTMP ,-(SP) 


MOV #4,- 
MOV 

TRAP CSPNTS 
ADD #12,SP 


sTHEN GO GET NEXT EVENT ENTRY 


sSTORE MSG ADDR FOR PRINT 
7STORE BYTE COUNT 

TORE BYTE COUNT COMP 
sPRINT ADDR, comet ata 12 


MOV EVTADD,-(SP) 
MOV #EVTF4A, =(SP) 
MOV #4,-(SP5 

MOV SP,RO 

TRAP  CSPNTS 

ADD #12,SP 


:THEN GO GET NEXT EVENT ENTRY 


sPRINT CHANGE TYPE 


MOV EVTTMP, ~($P) 
MOV Hy VTF3,=(SP) 
MOV (8 SP) 

MOV 

TRAP oSbN 

AD . 


D 
:PUT OLD MODEM STATUS IN | R3 FOR PRINTING 
GO PRINT OLD MODEM STAT 
*GO PRINT "CHANGED TO:' 
MOV #EVMOCG,-(SP) 
MOV #1,-(SP5 








Cc 8 


SEQ 93 
CVCLHC DPv-11., ATA, COMM, it NK TEST MACY11 30A(1052) 23-MAR=82 16:43 PAGE 94 
CVCLHC.P11 DUMP EVENT LOG 
788 0227 MOV SP,RO 
789 0 4 910600 TRAP  CSPNTS 
790 9 166 0687 000004 ADD #4,SP 
791 77 Oleg MOV (R2)+,R3 :PUT NEW MODEM STATUS IN R3 FOR PRINTING 
792 022774 737 023014 JSR PC,RPTMSB *GO PRINT NEW MODEM STA 
093 000137 022124 RPTMSE: JMP RPT :THEN GO GET NEXT Bent 
795 
796 023004 o1 604 ENDEVT: MOV (SP)+,R4 sRESTORE R4,R3,R2 
797 023006 603 MOV (SP) +,R3 
798 023010 912602 MOV (SP)+.R2 
799 02301 20 RTS PC ;RETURN TO CALLING ROUTINE 
3801 
3802 :REPORT MODEM STATUS SUBROUTINE 
380 : PART OF STATISICAL REPORTING (DUMPING EVENT LOG) 
5 023014 RPTMSB: PRINTS M#EVMOHD ;PRINT MODEM STATUS HEADER 
3806 023014 012746 016402 MOV #EVMOHD ,- (SP) 
7 023020 012746 000001 MOV #1,-(SP5 
023024 010600 MOV SP, 
3810 OS 308 Westy 000004 MD a 
3811 023034 012704 007556 MOV #MOBITS .R4 :MAKE R4 A POINTER TO MODEM SIG. BIT ber” + SBLE 
3812 023040 012705 007574 MOV #MOMSGS.RS [MAKE R5 A POINTER TO MODEM MSG. POSITION TABLE 
3813 023044 005714 6$: TST (R4) [SEE IF BIT AVAIABLE FROM DEVICE 
3814 023046 001004 BNE 7$ ‘BR IF THAT MODEM SIG. AVAIABLE 
3815 023050 112735 000130 MOVB = #"X, @(R5) + TELSE PUT ''X'’ IN REPORT IF SIGNAL NOT AVAILABLE 
1 023054 005724 TST (R4S+ [BUMP R4 TO POINT TO NEXT BIT DEFINITION 
3817 023056 000407 BR *G0 SEE IF CHECKED ALL MODEM SIGNAL 
3818 02 032403 7$: BIT (R4)+,R3 SIF THERE, SEE IF THAT BIT IN DEVICE'S ENTRY=1 
3819 3 901405 BEQ *BR IF BIf (SIGNAL) VAL 
0 112735 000061 MOVB = #1, @(R5) + :IF=1, PUT °1'* IN REPORT MESSAGE 
1 023070 000402 BR *G0 SFE IF ALL MODEM SIGNALS CHECKED 
g 023072 1127 0 8$: mMOVB «#0, @(R5) + TIF BIT(SIGNAL)=0, PUT ‘0’ IN REPORT MESSAGE 
0 3076 0427 007574 9$: CMP R4,AMOBITE [SEE IF ALL BITS(SIGNALS) CHECKED 
4 02310 2760 BLT SLOOP UNTIL ALL SIGNALS(BITS) CHECKED 
5 023104 PRINTS M#EVMOST :THEN PRINT MODEM SIGNAL VALUE MESSAGE 
6 023104 012746 016462 MOV #EVMOST,-(SP) 
i 023110 oi 746 000001 mov (SPS 
023116 104416 TRAP SPNTS 
0 3120 062705 000004 ADD #4,SP 
31 023124 00020 RTS PC sRETURN TO EVENT DECODING 
3 


CVCLHC_DPV-11_ DATA on _* NK TEST MACY11 30A(1052) 23-MAR-82 16:43 PAGE 95 
CVCLHC.P11 22-MAR-82 DUMP BYTES OR WORDS 


-SBTTL DUMP BYTES OR WORDS 


"FUNCTIONAL DESCRIPTION: 
DUMPSR = DUMP BYTES OR WORDS SUBROUTINE 


THIS ag te ph PRINTS THE CONTENTS OF THE LOCATIONS a 
A STARTING AND END ADDRESS IN LOCS. “‘STADD’* AND ‘'ENADD 

THE WORD OR BYTE CONTENTS ARE PRINTED 8 TO A LINE WITH THE 
ADDRESS OF THE FIRST BYTE AS THE FIRST 6 OCTAL CHARS. FOLLOWED 
BY A SEMICOLON. 


SSerESeSGuasae 


TS: 
STADD= STARTING ADDRESS (FIRST LOC. TO PRINT) 
ENADD= END ADDRESS (LAST iene TO, DUMP) 
BYTBIT= 1 IF SUPPOSED TO PRINT ‘BYTES'' 

0 IF SUPPOSED TO PRINT ‘WORDS 


Seige 
Pasoeee 


OUTPUTS: 
CONTENTS OF A RANGE OF LOC.S PRINTED ON THE OPERATORS CONSOLE. 


CALLING SEQUENCE: 
JSR PC,DUMPSR 3CALL DUMP BYTES SUBROUTINE 


ge 


eguee 


é 


OI sre 006510 : STADD ,R2 eset R2 UP TO STARTING ADDR. 
00500 DUM4: R3 
#BASM1 ,R2 SPRINT ADDRESS 


° 
Rated 


ogre 
012746 015501 
000002 


MIMO POPON 
WWIII 


BYTBIT 31S THIS BYTE OR WORD 
DUM1 F 


001416 :BR IF WORD 
11223 MOVB = (R2)+, TEMP 3MOV BYTE TO TEMP 
#BASMS,<B,TEMP> :PRINT BYTE 


5 
153716 534 BIS Toe (SP) 
O1874 2 a2. at 
10ee) ESénTF 
a9 


3 
ee 
3 
oi 

fs 


| 
| 
| 
| 


: 


eee 


os 


DUM2 

. : WBASM2,(R2)+  ;PRINT WORD Wins ~«59) 
12746 01547 Smo 
7% oh8608 nh) 


0441 ESéuTF 
ada Soest : ' ;COMPARE FOR LAST ADD 








CVCLHC_DPV-11_ DATA COMM. LINK TEST 
CVCLHC.P11 22-MAR-82 11: 


SSassess 


Be - 


023262 000207 


MACY11 pe net 16:43 PAGE 96 


DUMEX : 


BGT 
INC 


MP 
EQ 


BRe 


RTS 


BYTES OR WORDS 


’ 


PC 


x 
R3 


iIF DONE EXIT 
E BUMP R 
SHAVE WE PRINTED 8 ACCROSS 
31F SO GO BACK TO 
ZELSE ° BACK AND PRINT ANOTHER 
sRETURN TO CALLER 


SEQ 95 





F 8 





SEQ 96 
CVCLHC DPV-11 DATA COMM. LINK TEST MACY11 30A(1052) 23-MAR-82 16:43 PAGE 97 
CVCLHC.P11 22=MAR-82 11: UPDATE TOTAL CHAR. COUNT SUBROUTINE 
.SBTTL UPDATE TOTAL CHAR. COUNT SUBROUTINE 
¥ FUNCTIONAL DESCRIPTION: 
; UPDATES TOTAL CHAR. COUNT TOTCC BASED ON CURCC. 
: LAST T RESSAGE IS TRUNCATED TO aT Int 
; BUFFER IF TOTAL CHAR. COUNT EXC CO aEEIM A MESSAGE 
: IS PRINTED TELLING THE CURATOR” one TRUNCATION OCCURED. 
: INPUTS: 
3 CURCC= CHAR. COUNT OF MESSAGE BEING ADDED 
09 ; TOTCC= TOTAL CHAR COUNT OF BUFFER ITS BEING ADDED TO 
11 : OUTPUTS: 
4 : MESSAGE TO OPERATOR IF MESSAGE TRUNCATED TO FIT 
3914 : FUNCTIONAL SIDE EFFECTS: 
15 : OCATION "‘TEMP’’ USED FOR CALCULATIONS 
3916 ? CALLING SEQUENCE: 
3917 ss JSR PC,ADCC ;UPDATED TOTAL CHAR. COUNT 
319 ‘ 
921 023264 063737 006520 006530 ADDCC: ADD CURCC, TOTCC zADD CURRENT JO TOT 
2 023272 022737 001000 006530 CMP #BUFLIM, TOTCC +: COMPARE T U ; 
903 023 103027 BHIS  ADDC1 SIF NOT MORE THEN TSUFLIM EXIT 
: PRINT MESSAGE AND TRUNCATE COUNT 
02330 PRINTF #MSGTRU 
012746 014416 MOV #MSGTRU,-(SP) 


oo 
tae 
an 

S 


306 1 746 000001 MOV #1 = (SP) 
10441 TRAP CSPNTF 
1637 0065 CURCC, TOTCC : SUB FURRENT. FROM TOTAL z 

01 7 g 1 334 MOV #BUF LIM, TEMP V “BUFLI TEMP 
3 0065 SUB TOTCC, TEMP Sue TOTAL Fron *BUFLIM'’ 

04 73 006520 MOV TEMP, CURCC ZAND ESTABLISH NEW CURRENT 
737 0065 ADD curct, TOTCC SADD ADJUSTED CURRENT’ TO TOTAL CHAR. CNT. 

000207 ADDC1: ARTS PC [RETURN TO CALLER 


¥ 
oooo°O 
iW 


Bas 
oo 
Wibea 

as 
Sure 


wn 
wm 
% 
Www 


PERRET RR SRA 
Bisa were Bes Sos 
So oS 
MMM 
parce 
ed eh 
& 

_— 

Ww 
o 
4] 

s 
o 


SEQ 97 
CVCLHC DPV-11_ DATA com LINK TEST MACY11 30A(1052) 23-MAR-82 16:43 PAGE 98 
CVCLHC.P11 22-MAR-82 11: BUILD MESSAGE BUFFERS SUBROUTINE 
-SBTTL BUILD MESSAGE BUFFERS SUBROUTINE 
FUNCTIONAL DESCRIPTION: 
BLDBUF=-- BUILD POINTER TABLE AND BUFFERS 


THIS SUBROUTINE ADDS A MESSAGE TO THE TRANSMIT OR EXPECT LIST 
USING THE POINTER, BYTE COUNT, AND ADDRESS PASSED T0 IT. 


INPUTS: 
CURCC= CHAR. COUNT OF MESSAGE TO BE ADDED 
CURADD= ADDRESS OF MESSAGE TO BE ADDED 
CPTR= ADDRESS OF at Fina WORD WHERE MESSAGE POINTERS ARE 


TO BE BUIL 
MSGTYP= VALUE TO USE AS AN INDEX TO FIND SOURCE OF MESSAGE DATA 
OUTPUTS: INDEX INTO DMSGCT() AND DMSGAD(). 


A MESSAGE ADDED TO EITHER TXBUF OR CMPBUF 
APPROPRIATE POINTERS IN PTRTAB POINTER TABLE 





CALLING SEQUENCE: 
JSR PC,BL ;BUILD MESSAGE IN BUFFER AND ADD PTRS. 
023363 BLDBUF : 
02 362 010246 MOV Bt +7 (SP) sSAVE R2 AND R3 ON THE STACK 
7 023366 013702 006524 MOV 
9 0 372 0137 0065 6 BLDB1: MOV CURADD, (R2)+ spur CURRENT ADD ON POINTER TAB 
70 023376 013722 0065 MOV CURCC( (R2)+ T CURRENT CC ON POINTER TAB 
71 0 0102 524 MOV :PUr UPDATED R2 BACK TO CURRENT POINT 
7e 023406 01370 516 MOV nse SGET MESSAGE TYE TO USE AS INDEX 
12 ASL R2 -SEUBLE FOR WORD INDEX 
7% 14 01 526 006534 MOV CURADD, TEMP SMOVE CURRENT ADD TO TEMP 
75 9 7 520 0065 ADD CURCC fen SADD CHAR COUNT TO IT TO GET END 
76 1 703 6 MOV ¢ [SET R3 TO CURRENT START ADD 
02 1 002150 006540 BLDB2: MOV SasocT in ), TEMP2” “GET BYTE COUNT 
78 0 1 17 MOV DMSGAD(R2).R4 PUT START TING FROM ADD IN R4 
79 0 7 54 ADD R4.TE [ADD IT TO TEMP2 TO GET END OF FROM 
023452 11 423 BLDB3: MOVB (R4)+,(R3)+ 3MOV BYTE FROM PATTERN TO BUFFER 
, ri aaa: geo . ng cIF Asti 
7 006540 c Rs TEMP2 15 PA PATTERN COUNT EXPIRED 
17 BEQ If $0 GO START AGAIN 
5 0234 BR iF AN I GET ANOTHER BYTE 
737 006520 006526 BLDBEX: ADD CURE. ¢ ADD =s_- S BUMP 
0 1260 MOV RY STORE R3 AND R2 
SSBe 8688 pe 
989 0 RTS ;RETURN TO CALLER 


SEQ 98 
CVCLHC_DPV-11 Bw COMA. LINK TEST MACY11 30A(1052) 23-MAR-82 16:43 PAGE 99 
CVCLHC.P11 11: CREATE FACSIMILE OF TX BUFFER AND MESSAGE LIST 
2 ~SBTTL CREATE FACSIMILE OF TX BUFFER AND MESSAGE LIST 
- 
994 THIS Rove ADDED FOR REV B BY EC 


SFUNCTIONAL DESCRIPTI 
FACSIMILE: rans ROUTINE is USED TO CREATE A reset a THE 
T IST _AND_ TRANSMIT BUFFE eis 


OF T IT L 

PXPECTED LIST AND EXPECTED BUFFER. THER 
NORMALLY CALLED WHEN USER COMMAND ‘'SET E XPeerds 
T CRANSMIT is ENTERED. 


4000 
4001 
ris CALLING SEQUENCE: JSR PC,FACSIMILE 
4004 ~ 
4005 8 DEFINITIONS ae = oer mr BUFFER HOLDS MAX 512 BYTES 
4006 ; TXBUF = TRANSMIT DATA BUFFER HOLDS MAX 512 BYTES 
4007 3 TTOTCC = NUMBER OF BYTES IN TXBUF 
4008 3 PTRTAB = TOP OF MESSAGE LIST POINTER TABLE 
4009 ; CTOTCC = NUMBER OF BYTES IN EXPECT MESSAGE 
4010 3 CMPTOT = NUMBER OF EXPEC MES 
4011 3 CMPPTR = EXPECTED MESSAGE LIST TER 
red 3 TXPTR = TRANSMIT MESSAGE LIST POINTER 
401 3 TXMTOT = NUMBER OF TRANSMIT MES $s 
4014 3 CCURAD = STORAGE ADDRESS OF MESSAGE IN C 
rr dF : MSGLIN = MAXIMUM NUMBER OF MESSAGES THAT CAN BE STORED 
4017 3 BEGIN FACSIMILE ROUTINE 
4018 3 (COPY TXBUF ==> CMPBUF*) 
4019 3 - SAVE 
4020 3 -- INIT hy 
4021 3 » REPEAT 
402 3 eee LCMPBUF JR1=CTXBUF IRI 
40, e eee PIZRIF 1 
10S¢ ; - UNTIL R1 = BUFLIM 
402 3 (*#NOW CALCULATE EXPECT LIST MESSAGE POINTER*) 
pris ; --CMPPTR = PTRTAB + (2 * MSGLIM) 
40 ; (*NOW PRIME THE WHILE - DO LOOP*) 
40 g 2 TXPTR = PTRTAB 
4031 3 “fCUNS = 
40 : ;.TXPTR = TXPTR + 2 
403 3 “*cToTce” = = CTxPTRI 
40 3 -CMPTOT 
4035 3 ; WHILE TXMTOT <> CMPTOT DO 
$038 3 eeeeLCMPPTR] = CCURAD 
40 3 cece = CMPPRT + 2 
40 g eeeeLCMPPTR] = CTOTCC 
4039 3 ecee = TXPTR + 
4040 : eeeeCCURAD = foun + CTOTCC 
rth : ooo of LOTEE = CTXPTRI 
§ 3 ecce = CMPPTR : 
404 3 oo NOTOT = CMPTOT + 
4044 3 WHILE DO 
4045 3 —d.Torce = TTOTCe 
4046 3 END FACSIMILE ROUTINE 


SEQ 99 
CVCLHC pPv-11 BATA COMM, it NK TEST MACY11 30A(1052) oak 82 16:43 PAGE 100 
CVCLHC.P11 -MAR-82 CREATE FACSIMILE OF TX BUFFER AND MESSAGE LIST 

4047 

4048 023506 FACSIMILE: 

4050 0235 Hh 146 MOV R1,-(SP) :SAVE R1 

4051 02351 001 CLR i ‘INIT R1 

405 9 51 N61 1 003150 005150 10$:  MOVB $TXBUF(R1),CMPBUF(R1) | ;COPY TX BUFFER TO EXPECTED BUFFER 

405 520 005201 INC 1 [BUMP INDEX 

4054 0235 9201 7 001000 CMP R1,#BUFLIM SALL DATA COPIED ? 

4095 5 1371 BNE 10$ NO, BRANCH 

toes 02 530 012701 000017 208: MOV #MSGLIM,R1 sMESSAGE LIMIT 

4058 534 006301 ASL R1 *MULTIPLY BY 

4059 0235 006301 ASL R1 ‘MULTIPLY BY 

4060 023540 012737 006150 006444 MOV #PTRTAB, CMPPTR [TOP OF POINTER TABLE 

4061 023946 50137 006444 ADD R1,CMPPTR ‘START OF EXPECTED POINTER TABLE 

4062 55 5001 CLR R1 SINIT RI 

406 

4064 :SET UP WHILE - DO LOOP 

4065 023554 012737 006150 006442 MOV TRTAB. TXPTR :TX POINTER NOW AT TOP OF TABLE 

4 023562 012737 005150 00645 MOV ac CCURAD : TRANSFER ADDRESS OF 1ST MESSAGE 

4067 023570 062737 006442 ADD aera :BUMP POINT 

4068 023576 017737 162640 006450 MOV STKPTR.CTOTCC *BYTE COUNTER 1ST MESSAGE 

4069 2 005037 4 CLR CMPTOT S INIT EXPECTED MESSAGE COUNT 

4071 WHILE ™ RESSAGE TOTAL <> EXPECTED MESSAGE TOTAL DO 

407¢ 023610 023737 006462 006446 30$: CMP XMTOT, CMPTOT ZALL MESSAGES COPIED ? 

4073 023616 0014 BEQ H YES BRAN 

4074 0 013777 006452 162616 MOV CCURAD,@CMPPTR S TRANSFER ADDRESS OF MESSAGE 

4075 023626 73 900008 006444 ADD [BUMP POINTER 

4076 0 013777 006450 16260 MOV CTOTCC, a@CMPPTR :BYTE COUNT OF MESSA 

4077 02364 062 7 4 ADD : GE POINTER 

4078 02365 737 30 00645 ADD CTOTCC,.CCURAD *CALC. TRANSFER ADDRESS 

4079 023656 017737 162560 006450 MOV @TXPTR,CTOTCC ‘BYTE COUNT NEXT MESSA 

4080 023664 062737 2 006444 ADD #2, CMPPTR [BUMP POINTER 

4081 023672 005237 46 INC MPTOT s INCREMENT MESSAGE COUNT 

4082 3676 000744 BR wits - [D0 IT AGAIN 

4084 023700 013737 006464 006450 40$: OV TTOTCC, CTOTCC sCOPY TOTAL CHARACTER COUNT 

:END ROUTINE 
408 4 023 012601 MOV (SP)+,R1 :RESTORE R1 
4088 023710 000207 RTS PC RETURN 


J 8 


was 


ab the 534 MOV #PST, TEMP 
1 7714 BIT #STATB,DEV4 3SEE IF /STATUS OR /NOSTATUS 
BNE 1$ 3BR IF /STATUS 


1377 5 MOV #PNST TEMP 
14 536 (1S: MOV #PCK, TEMP 
714 BIT WATS DEVS 3SEE IF /CHECK OR /NOCHECK 
BNE $ SBR IF /CHECK 


Ronen 
WASANNS 
NNN NN 


oo ae 
—d ad od 

oo aS 
as 

NW 

5 

os 

f=] 

os 

<— 


14003 $36 “nV APNCK, TEMP1 
1401 540 2$: MOV #PEC, TEMP2 

714 BIT CHOB , DEV4 :SEE IF /ECHO OR /NOECHO 
4 *BR IF /ECHO 
#PNEC , TEMP2 


SEQ 100 
CVCLHC DPV=-11 DATA COMM. LINK TEST MACY11 30A(1052) 23-MAR-82 16:43 PAGE 101 
CVCLHC.P11 22-MAR~82 11: OW MODE OF OPERATION, LOOP TYPE AND QUALIFIERS 
4091 .SBTTL SHOW MODE OF OPERATION, LOOP TYPE AND QUALIFIERS 
409 i+ 
4094 : FUNCTIONAL DESCRIPTION: 
4095 : SHWOP = SHOW MODE OF OPERATION, LOOP, QULAIFIERS 
4096 ; PRINTED ON THE OPERATOR'S CONSOLE. 
4098 3; INPUTS: 
4099 : DEVi= MODE TYPE (MODTY TYP) 
4100 : DEV2= MAINT LOOP TYPE (MLTYP) 
4101 : DEV3= ‘RUN PASS’ COUNT (RPASS) = COUNT DOWN 
419 : DEV4=  PARAMTERS WORD (PARAM) 
4104 : IMPLICIT INPUTS: 
4105 : MODES= TABLE OF ADDRESSES OF MODE NAME STRINGS 
4106 : LOOPS= TABLE OF ADDRESSES OF LGOP TYPE NAMES 
4108 t CALLING SEQUENCE: 
4109 : JSR PC, SHWOP 
ais a 
4 
aii 023712 013702 007706 SHWOP: MOV DEVI.R2 :GET THE MODE TYPE IN R2 
411 025716 00630¢ ASL R [MAKE IT A WORD TABLE OFFSET 
4114 083 01623 003102 006534 MOV MODES (R2) , TEMP GET ADDRESS OF MODE=IN-AS CII 
4115 023726 013702 00771 MOV DEV2,R2 [GET MAINTENANCE LOOP TYPE 
4116 0237 00630 ASL ; 
4117 023734 012737 013715 006542 MOV #LPOO, TEMP ;LOAD TEMP3 TO POINT TO °‘/LOOP="* 
4118 023742 5708 TST Re TSEE IF /LOOP=XXXXX OR NONE 
4119 Og5744 90 BNE : F /LOOP= OF SOME KIND 
4120 023746 012737 013714 006542 MOV bP0,T MP3 SIF NO LOOP THEN DON'T PRINT "‘/LOOP="" 
4121 023754 016237 003120 006536 10$: MOV PeOs (ROD TEMP1 :GET ADDRESS OF pkQOPcIN-ASCII 
419¢ 023762 013737 007712 006540 MOV DEV3, TEMPS :GET NUMBER OF PASSES 
4123 023 PRINTS #SHFO, TEMP, TEMP3,TEMP1,TEMP2 
4124 0 307 13746 006540 MOV TEMP2,-(SP) 
4125 023774 013746 5 MOV TEMP1 ,-(SP) 
41 0 4000 013746 54 MOV TEMPS, -( 
4 4004 013746 5 TEMP, (SP) 
4 4010 012746 014501 MOV #snrd -(SP) 
4 024014 012746 000005 MOV 7 (SP) 
4 0240 1 MOV 
4 9240 106616 TRAP + CS$PNTS 
4 4 000014 ADD #14,SP 
4 CLR R2 sNOW SET UP FOR QUALIFIERS IN ASCII 
4 
4 
4 
4 
4 
4 
4 
4 
4 
4 
4 


SEREALSESSLEAFUNSSVSY 
SEES 


eh ah st ot a tot 


014013 


CVCLHC_DPV-11_ DATA conn e NK TEST MACY11 ag aM 23-MAR-82 16:43 PAGE 1% 
CVCLHC.P11 22-MAR-82 OW MODE OF OPERATION, LOOP TYPE AND QUALIFIERS 


SEQ 101 


4148 0 4126 0127 7 014034 006544 4$: MOV #PPR, TEMP4 

4149 024134 032737 040 007714 BIT #PROTOB,DEV4 § ;SEE OF /PROTOCOL OR /NOPROTOCOL 

4150 024142 BNE *BR IF /PROTOCOL 

4151 024144 01 14032 006544 MOV #PNPR, TEMP4 

4i3¢ 0 4158 12737 014024 006546 3S: MOV #PMS, TEMPS 

415 9 4160 032737 000010 007714 BIT #MOCHK , DEV4 :SEE IF /MODEM OR /NOMODEM 

4154 026166 901003 BNE ‘BR IF MODEM 

a136 024170 012 014022 006546 MOV #PNMS , TEMPS 

415 

4158 024176 5$: PRINTS #SHF1, TEMP, TEMP1, TEMP2, TEMPS, TEMP4 TEMPS 

4159 024176 013746 006544 MOV TEMP4 ,=(SP) 
4160 024202 013746 006546 MOV TEMPS .-(SP) 
4161 024206 013746 006540 MOV TEMP2,-(SP) 
4162 024212 013746 006536 MOV TEMP1 ,=(SP) 
4163 024 1g 013746 006534 MOV TEMP, 
4164 024 012746 014537 MOV #SHF 1 ,=(SP) 
4165 024 $ 012746 000006 MOV #6,- 

4166 024 01 MOV SP.RO 

HS, SEH HSE coos Be 
4169 rere] 000207 RTS PC RETURN = 
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MACY11 PEEL 23-MAR-82 16:43 PAGE 103 
ERSE COMMAND LINE SUBROUTINES 


-SBTTL TRAVERSE COMMAND LINE SUBROUTINES 


34 


+ 
: PSTRV SUBROUI TNE 


SPARSE THE COMMAND LINE SUBROUTINE 
STAKE ACTIONS (VIA ACTION TREE) AS PARSING LINE 
: PARSING a FROM "*CLI PARSING NODES” 


R1,R5=SCRATCH 
RS=PARGe' Thee CODE ain FROM TREE 
. =PARSE T T 
STRING 6 POINTER 
CALLING” SEQUENCE: 
JSR PC .PSTRV 


PSNUM=NUMERIC CODE FROM DATA 


PSTRV: 
MOV PSBUFA,P%4 


MOV PSTREE ,R3 
PSTRS: pr (R4) 


i SEE IF ANY CHARS LEFT IN INPUT STRING 
iSEE IF SPECIAL CLI CHAR. CODE OR ASCII 
MOVB = (R3) RS [GET SPECIAL CHAR CODE INTO RS 
1OS(R5), oRS ;BUILD TRAVERSE ROUTINE ADDRESS 


D 
JSR PC (aS) zJSR_TO SPECIAL CLI TRAVERSE ROUTINE 
BR PSTRS 3G0 SEE IF MORE OF STRING LEFT 


10$:  .WORD TRVERR-10$ s TRAVERSE TABLE FOR "CLI FUNTIONS"’ 
"WORD TRVEXI-10$ 21 
«WORD TRVBR- 3§ 
"WORD TRVBIF-10$ : 
"WORD TRVSPA-10$ 34 
SWORD TRVNUB-108 5 
"WORD TRVALP-10$ :6 
"WORD TRVALN-1 : 
"WORD TRVOCT-10$ 38 
"WORD TRVDEC-10$ 29 
"WORD TRVSTR-10$ 10 
:NOT A SPECIAL CODE 
20$:  CMPB  (R3),(R4) sSEE IF FIRST CHAR OF STRING IS A MATCH 
BEQ BR IF A MATCH 
JSR PC, TRVBRC TIF NOT A MATCH, GO TAKE MISS BRANCH 
BR ; THEN, GO BACK PT'G 19 MISS NODE 
228: JSR PC, TRVACT SIF A MATCH, GO bo” ACTION DEFINED BY 
ADD #4°R3 : ACTION CODE IN CLI NODE, THEN 
* ADJUST PTR TO NEXT CLI NODE 
Inc fo. SADJUST BUF PTR TO NEXT CHAR IF MATCH 


SEQ 102 


CVCLHC_DPV-11_DATA COMM. LINK TEST MACY11 SOA (TORE 23-MAR=82 16:43 PAGE 104 
CVCLHC.P11 22-MAR=82 11:09 ERSE COMMAND LINE SUBROUTINES 


SEQ 103 


024362 000207 PSEXIT: RTS PC sRETURN FROM PARSER 


GOTO USER ACTION R UTINE 
TRVACT: MOVB ) R2 3GET ACTION CODE FROM CLI NODE 
Wi 460,R2 EAR ANY SIGN EXTENSI 
MOV PSACT,R Behe [GET ADDRESS OF CLI ACTION ROUTINE 
024 4400 JSR Pc, (R5) *GO DO ACTION DEFINED BY CODE 
38 02440 RTS PC SRETURN TO CALLING ¢ 


STAKE BRANCH IN TREE 

024404 TRVBRC: MOV —-2(R3) ,RS iGET_ BRANCH tro ie FROM TREE 
024410 060503 ADD —s-RSR3 3 AND PO TO THE ‘MISS"* NODE 
024412 RTS = PC RETURN TO PSTR 


;NO BRANCH TAKEN 
46 ehh 000004 TRVNOB: ADD #4 ,R3 : THINGS OK, UPDATE R3 TO POINT TO NEXT 
024420 000 RTS PC 3 NODE AND RETURN TO PSTRV 


024422 004737 0243 TRVERR: JSR PC, TRVACT TAKE ERROR ACTION. 
7777 mova = #1 ,PSGDBD ZSET ERROR RETURN FLAG me 
(SP5+ :GET RID OF “JSR PUSH TO TRVERR 
024362 PSEXIT [RETURN DIRECT TO EXIT OF PSTRV ROUTINE 


7 024364 TAVEXI : PC, TRVACT 3 TAKE EXIT ACTION 
003147 C P$GD3D 3SET GOOD/BAD FLAG TO "SUCCESS (0)"* 
(SP)+ 3GET RID OF "JSR PUSH TO TRVEXI 
024362 MP = PSEXIT 3RETURN DIRECT TO EXIT OF PSTRV ROUTINE 


Oot ret : PC, TRVACT GO TAKE BRANCH ACTION 
4404 JMP TRVBRC 


7 024364 PC, TRVACT 
003147 T P$GDBD 3SEE IF PS$GDBD SET OR Ore BY ACTION 
E 1$ IF CLEAR FALL L THRU TO NEXT NODE 
024404 MP TRVBRC ZELSE TAKE THE ‘MISS’ CH 
024414 : TRVNOB :JUST UPDATE TO NEXT NODE IF THINGS OK 


RS 3CLEAR “SPACE OR TAB FOUND'* FLAG 
000011 a: Been i SEE IF CHAR. IN CMD LINE= TAS 


NO, NOT A TAB 
C INPUT STRING POINTER 
CATE A FOUND 
HECK NEXT CHAR 


HECK NEXT CHAR 
E IF ANY SPACES OR TABS FOUND 
F NO TAKE NO ACTION 
€ ACTION IF ANY FOUND 


15$ 
PC, TRVACT 
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15$: 


TRVDEC: 


TRVOCT: 
TRVNUM: 
TRVNMA: 
10$: 


118: 
1$: 


30A(1052) 23-MAR-82 16:43 PAGE 105 
TRAVERSE COMMAND LINE SUBROUTINES 


JMP 
JMP 


MOV 
JMP 


TRVNOB 
TRVBRC 


#10. ,PSRADX 


east GO UPDATE R3 TO NEXT wrt IF OK 
AKE BRANCH (MISS) IF NONE FOUND 


sUSE DECIMAL AS RADIX AND ASSUME + 


(SAME AS TRVNUM SINCE DEFAULT RADIX IS OCTAL) 
Mov r ADX 


BGT 
PRINTF 


R 

(R4) ,#°+ 

10$ 

11$ 

(R4) ,#'= 

#-1 ,PSRADX+1 
R4 


(R4) ,#60 
(R4) ,#67 
13$ 

PSRADX #10. 
12$ 

(R4) ,#71 
#CLIBRX 


#-1 »PS$GDBD 
5$ 


(R4) #71 
2s 


5$ 
oR 
°R1 


ike 


oPSCNT 


x,#10. 


USE OCTAL AS RADIX AND ASSUME + 
CLEAR DIGIT COUNT 
:SEE IF THERE'S A + SIGN THERE 


t ELSE PSRADX ALREADY SAYS +, JUST BR 
:SEE IF THERE'S A = SIGN THERE 

tSET PT MINUS FLAG’ (HI BYTE OF PSRADX) 
:BUMP R4 TO POINT TO FIRST CHAR 


;SEE IF CHAR. LESS THAN A °°’ 
sBR IF YES (NOT NUMERIC) 
E IF a GREATER THAN A °7°** 


WHEN IN OCTAL RADIX 
MOV 


#CLIBRX,-(SP) 
SP5 


SP“RO 
SCANT 
#4,SP 
zSET ERROR RETURN FLAG 
PRINT ERROR AND TAKE MISS 


sSEE IF CHAR. GREATER THAN A ‘9"° 
7BR IF YES (NOT NUMERIC) 

UPDATE CMD LINE PTR TO NEXT CHAR. 
s INDICATE A NUMERIC FOUND 

260 LOOK AT NEXT CHAR. 


3SEE_IF FOUND ANY NUMERIC 
SBR IF_NO. TAKE MISS" BRANCH 
3GET POINTER TO START OF NUMERIC STRING 


sCLEAR LOC. WHERE VALUE WILL BE STORED 
3GET ASCII CHAR AND CONVERT IT TO A # 


:SHIFT CURRENT VALUE TO MAKE ROOM 
SAVE AVE FOR CATER LAT ER. 1" CASE DECIMAL RADIX 
ERROR IF NUMBER TOO BIG 


isce IF IBECIPAL RADIX 
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SEQ 105 
CVCLHC DPV=11 DATA COMM. LINK TEST MACY11 30A(1052) 23-MAR=B82 16:43 PAGE 106 
CVCLHC.P11  22=MAR-82 11:09 E COMMAND LINE SUBROUTINES 
4340 025014 963737 003140 003142 ADD PSCNT ,PSNUM 
4341 025022 1 16 BCS 7$ sERROR IF NUMBER TOO BIG 
4 : 0390 4 96025 003142 4$: ADD R2,PSNUM 
434 5030 1 3413 BCS 7$ :ERROR IF NUMBER TOO BIG 
4344 025032 00 30 DEC R5 
4345 025034 001344 BNE 3$ 
4346 025036 105737 003145 TSTB PSRADX+1 :SEE IF NUM WAS PRECEDED BY A = SIGN 
4347 02504 00140¢ BEQ 15$ 
4348 025044 00945 003142 NEG PSNUM ¢ Bree NEGATE THE NUMBER BEFORE LEAVING 
4349 025050 004737 024364 15$: JSR PC, TRVACT *SINCE NUMERIC FOUND, GO TAKE ACTION 
430 025054 000137 024414 JMP TRVNOB 760 POINT R3 TO NEXT NODE 
4352 025060 7$: PRINTF #CLINBG :PRINT NUMBER TOO BIG ERROR 
4353 025060 012746 011660 MOV #CLINGG,-(SP) 
4354 025064 012746 000001 MOV #1,-(SPS 
4355 025070 010600 MCV SP,RO 
4356 025072 104417 TRAP  CSPNTF 
4357 025074 062706 000004 D 4,SP 
4358 025100 112737 177777 003147 MOVB = #=1,, P$GDBD :SET ERROR RETURN FLAG 
4359 025106 000137 024404 5$: JMP TRVBRC STAKE 'MISS'’ BRANCH 
4361 
4362 025112 005005 TRVALP: CLR R5 CLEAR ALPHA FOUND FLAG 
4363 025114 121427 000101 1$: CMPB —s-: (RG) , #101 SSEE IF CHAR. LESS THAN A "A 
4364 025120 002406 BLT <BR IF YE ) wire 
4365 025122 121427 000132 CMPB —s« (RG) , #132 “SEE IF CHAR. GREATER THAN A ‘'Z 
4366 Os3i¢s 003003 BGT 2$ “BR IF YES (NOT ALPHA 
4367 025130 005204 INC RG [UPDATE CHD LINE PTR TO NEXT CHAR 
025132 005205 INC RS S INDICATE AN ALPHA WAS FOUND 
4369 025134 000767 aR 1$ :G0 LOOK AT WEXT CHAR. 
4370 025136 005705 2$: TST R5 [SEE IF ANY ALPHA'S WERE FOUND 
4371 025140 001404 BEQ 3$ ‘BR IF NO 
4372 025142 004737 024364 JSR PC, TRVACT SIF ANY FOUND TAKE ACTION 
4373 025146 000137 024414 JMP TRVNOB : THEN UPDATE ast 6 NEXT NODE -NO BRANCH 
4374 025152 000137 024404 3$: JMP TRVBRC NONE FOUND, TAKE MISS BRANCH 
4376 025156 005005 TRVALN: CLR RS :CLEAR ALPHANUM FOUND FLAG 
4377 025160 121427 000060 10$:  CMPB (R4),#60 ‘SEE IF CHAR. LESS THAN A "0" 
4378 025164 002417 BLT :BR IF YES (NOT MMERIC OR ALPHA) 
4379 025166 121427 000072 CMPB —s« (RG) , #72 *SEE IF CHAR. GREATER THAN A "9" 
4380 025172 003003 BGT 1$ “BR IF YES (NOT RIC) 
4381 025174 005204 INC R4 SUPDATE CMD LINE PTR TO NEXT CHAR. 
4382 02517 5205 INC R5 ZINDICATE A NUMERIC FOUND 
4383 025 67 BR 10$ "GO LOOK AT NEXT CHAR. 
4384 025202 121427 000101 1$: CMPB —s« (R44) , #101 [SEE IF CHAR. LESS THAN A “‘A’ 
4385 025 2406 BLT 2$ 7BR IF Y 
025210 121427 000132 ra (R4) #132 “SEE IF CHAR. GREATER THAN A "2" 
438 5214 003003 BGT 2$ “BR IF AL 
02521 5204 INC R4 SUPDATE CMD LINE PTR TO NEXT CHAR 
025 5205 INC RS ‘INDICATE AN ALPHA FOUND 
43 0 5 6 BR 10$ 60 LOOK AT NEXT CHAR. 
4391 025224 00 70 2$: TST R5 *SEE IF ANY ALPHANUM'S WERE FOUND 
4392 025226 1404 BEQ 33 :BR I 
4393 025230 004737 024364 JSR PC, TRVACT SIF ANY FOUND TAKE ACTION 
439% 038 34 000137 4414 JMP TRVNOB : THEN UPDATE ast “3 NEXT NODE -NO BRANCH 
4395 025240 000137 024404 3$: JMP TRVBRC [NONE FOUND, TAKE MISS BRANCH 


CVCLHC DPv-11,, ATA, COMM LINK TEST 
CVCLHC.P11 2 11: 
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MACY11 SE EL 23-MAR-82 16:43 PAGE 107 
ERSE COMMAND LINE SUBROUTINES 


TRVSTR: aad Re Rl 3POINT R1 TO CMD STRING 
#6,R5 3;POUNT RS TO MATCH STRING FROM CLI NODE 
CLR PSCNT 7CLEAR_CHAR MATCH COUN 
2s: uate (ne 3 SEE if wer OF MATCH STRING YET 
TST8 (R1) 3SEE iF END OF CMD LINE YET 
BEQ 10$ Y 
aA a iSEE P enaes MATCH 
INC PSCNT SMATCH INCREMENT MATCH COUNT 
ing RI [UPDATE STRING POINTERS 
2s 3BR TO CONTINUE CHECKING CHARS. 
10$: TST PSCNT sWHEN DONE SEE IF ANY MATCHES FOUND 
BEQ 15$ 3BR IF NO, GO TAKE THE MISS BRANCH 
MOV R1,R4 POINT CMD POINTER TO END OF STRING & 
JSR PC, TRVACT IF AMAT gH FOUND, GO DO MATCH ACTION 
D 4(R3) ,R3 sUPDATE RS TO _NEX sack (NO BRANCH) 
RTS 3 RET TRVNOB SINCE DIFFERNT 


; URN 
: ee DUE TO MATCH STRING) 
15$: JMP TRVBRC 3 GO TAKE BRANCH 


3 (PARSED OK), « IF ILL CMD..... 


CVCLHC ioe 2 IR conn it NK TEST MACY11 30A(1052) awe 16:43 PAGE 108 
CVCLHC.P11 REPORT CODING SECTION 


SEQ 107 


rr $ -SBTTL REPORT CODING SECTION 

4428 

4429 st 

44 ; THE REPORT CODING SECTION CONTAINS THE 

a 1 : PRINTS'' CALLS THAT GENERATE STATISTICAL REPORTS. 

44 ; 

44 atts, BGNRPT 

rr 5 025334 LSRPT:: 
44 

4438 025334 004737 020610 JSR PC REPORT sCALL SUBROUTINE TO DUMP EVENT LOG 
4439 3: AND BASE TABLE 

4440 

4441 

444 

444 

4444 025340 ENDRPT 

4445 025340 L10010: 


4446 025340 104425 TRAP CSRPT 








CVCLHC_DPV-11_ DATA C 
CVCLHC.P11 


093343 


953¢4 
025346 


025350 


22-MAR-82 


177777 
177777 
177777 


Ee 9 


SEQ 108 


oe teak TEST MACY11 aera 23-MAR-82 16:43 PAGE 109 


PROTECTION TABLE 
-SBTTL PROTECTION TABLE 


Tus TABLE IS USED BY THE RUNTIME SERVICES 
; TO PROTECT THE LOAD MEDIA. 


LSPROT:: 
-1 soerset INTO P-TABLE FOR CSR ADDRESS 
-1 ‘OFFSET INTO P-TABLE FOR MASSBUS ADDRESS 
~t [OFFSET INTO P-TABLE FOR DRIVE NUMBER 
ENDPROT 


CVCLHC_DPV-11_ DATA 
22-MAR 


CVCLHC.P11 


4463 


O¢3 50 
025350 
0 2320 
ae 
0 3369 

5366 

5366 


025370 


012737 


6 
76 012700 


104447 
103417 


012700 
104447 


103513 


012700 
104447 


10300. 
00013 


COMM. LINK TEST 
=82 itd 


B06562 


006562 


177777 
000040 


006564 


000037 


000036 


026116 
000035 


seis 
4 
006620 
000114 


800100 006630 


F 9 


SEQ 109 


MACY11 30A(1052) 23-MAR-82 16:43 PAGE 110 
INITIALIZE SECTION 


eSBTTL INITIALIZE SECTION 


THE INITIALIZE SECTION CONTAINS THE CODING THAT IS PERFORMED 


; AT THE BEGINNING OF EACH PASS. 


INIT1: 


$1: 


START: 


$2: 


BGNINIT 

CLR KEYWD1 

TST DCLFLG 
EQ INIT1 
LR DCLFLG 

DOCLN 


MOV #-1 ,RESFLG 
READEF #EF.START 


BCOMPLETE START 
READEF #EF .RESTART 


BCOMPLETE RESTRT 
READEF #EF.CONTINUE 


BNCOMPLETE $1 
JMP ENDIT 
READEF #EF .NEW 
BCOMPLETE NEW 
BR GETPRM 

CLR RESFLG 

CLR CLKVEC 

MOV #CLKCSR,R2 
CLOCK L,RI1 
BNCOMPLETE $2 


JSR PC, CLKSE 
MOV #LCLKEN, tLKEN 


CLOCK ca 


LSINIT:: 


INIT COMMAND STORAGE VARIABLE 
; CLEANUP - he B EC 


NO, BRANCH 
sCLEAR FLAG REV B EC 
‘60 CLEANUP AND EXIT REV. BE EC 


CSDCLN 


SET RESTART FLAG 

ZIF HERE CAUSE OF START,DO SOME INIT 
“MOV #EF START RO 
TRAP CSREFG 


BCS START 

31F HERE CAUSE OF RESTART, DO SOME INIT 
MOV #EF RESTART RO 
TRAP CSREFG 


BCS RESTRT 
3SEE IF WE'RE HERE CAUSE OF A CONTINUE 
~~, ee 
3BR IF NOT HERE CAUSE OF “CONTE. 
3JMP IF HERE CAUSE OF A CONTINUE 
zSEE IF THIS IS A "NEW PASS" 


TRAP 
31F YES, BR AROUND LOGUNIT # SETUP 
BCS NEW 


sCLEAR RESTART FLAG SINCE ye om START 
CLEAR CLK VECTOR PTR. AS A G IN 


FOUND. 
3SET UP_R2 AS A PTR. TO CLOCK INFO BLOCK 
sLOOK FOR A LINE CLOCK 


L.RO 
TRAP estite 

MOV RI 

: If NONE THERE GO LOOK FOR A P-CLOCK 


cc 
GO SET UP CLOCK INFO TABLE & CLK VEC. 
$SETUP THE ENABLE LINE CLOCK DATA 


;LOOK FOR A P-CLOCK SINCE NO LINE CLOCK 
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SEQ 110 
CVCLHC DPV-11 DATA, comm LINK TEST MACY11 30A(1052) 23-MAR-82 16:43 PAGE 111 
CVCLHC.P11 22=MAR-82 11: INITIALIZE SECTION 

4519 025506 0 000120 MOV #°P,RO 
45 331 tthe TRAP  C$CLCK 
4521 1 010001 MOV RO,R1 
43 3 3316 one BNCOMPLETE $3 : IF NONE THERE GO SEE IF THIS 2 ne 
4524 0255 39 7 017730 JSR PC, CLKSET : ELSE GO SET UP CLOCK INFO © VECTOR 
4525 025524 737 9066 9 ADD #2.CLKCSR *POINT CLKCSR TO P=CLK COUNT SET REG. 
4526 0255 1 61 MOV #PCLKCT,@CLKCSR *LOAD CLK SET REG. WITH COUNT VALUE 
4527 025540 162737 006620 SUB #2, CLKCSR *POINT CLKCSR BAC TO P-CLK CSR 
4528 025546 012737 00011 0 MOV #PCLKEN, CLKEN SSETUP THE ENABLE THE P-CLK DATA 
4 5554 33 BR RESTRT 
4531 025556 $3: READBUS ;READ BUS TYPE TO SEE IF ON AN LSI 
4532 025556 104407 TRAP C$RDBU 
4333 5560 BNCOMPLETE $4 :BR IF NOT, NO CHANCE OF A CLOCK 
45 5 103021 Bcc $4 
4535 025 012737 900100 006624 MOV #100 CLKVEC sLOAD 100 AS CLK VECTOR 
4336 0255 037 00662 CLR [LOAD 0 AS CLK INT. LEVEL 
45 5574 012737 006630 006620 MOV SCLKEN, CLKCSR *KLUDGE UP THE CSR & ENABLE DATA LOCS 
45 025602 GMANID 15060,CLKHZ,D,377,50.,60.,YES 
4539 025602 104443 TRAP  CSGMAN 
4540 025604 000406 BR 1 
4541 02 00662 .WORD  CLKHZ 
4542 025610 00005 “WORD TSCODE 
4543 025612 014 “WORD 43060 

025614 000 “WORD 377 
4545 025616 000062 “WORD TSLOLIM 
4946 02 000074 “WORD TSHILIM 
454 562 10000$: 
4948 025622 000410 BR RESTRT 
4550 0256246 $4: PRINTF #BDCLK s INFORM OPR. NO CLOCK, & EXIT INIT 
4551 025624 012746 014202 MOV #BDCLK,-(SP) 
4552 0 012746 000001 MOV #1,-(SP) 
4553 025634 01 MOV 
4554 02 10441 TRAP  CSPNTF 
4999 67 a6 062706 000004 ADD #4,SP 
4557 025644 5037 006632 RESTRT: CLR TIMMIN :CLEAR TIME SINCE START LOCATIONS 
4558 025050 005037 CLR TIMSEC 
4559 025654 013737 6 006636 MOV CLKHZ, TIMTCK ZLOAD TICKS/SEC 
4560 127 3 MOV #EVILOG R2 3INIT EVENT TABLE TO ALL 1°S AFTER EACH 
4561 1 4 6 MOV R2,EVTPTR ; START OR RES AND INIT TABLE POINTER 
496¢ 56 1 2 7 1$: MOV #1, (R2)+ 
4 7 02 ¢ 007552 CMP R2 -AEVTEND SEE IF REACHED END OF TABLE 
4364 5 1 BNE 1 SLOOP UNTIL DONE 
4366 025704 012737 177777 006556 NEW: MOV #1, LOGUNT sINITIALIZE LOGICAL UNIT # 
4568 025712 005237 556 GETPRM: INC LOGUNT :POINT TO NEXT LOGICAL UNIT 
4569 025716 3737 556 002012 CMP LOGUNT ,LSUNIT *SEE IF PAST MAX. LOG. UNIT # 
4370 724 002367 BGE NEW [BR IF YES, AND START OVER 
45 5726 GPHARD LOGUNT,R1 3GET THE P-TABLE FOR THIS LOG. UNIT 
£358 0357 013700 006556 MOV LOGUNT RO 
4574 025732 10444 TRAP 6 


CVCLHC eet com tao” TEST 


CVCLHC.P11 
4575 
457 03 
4 7 


025740 


025744 


4599 026054 


SSESSESRSES ISIS 
SEVARVAD 


oS 


FSKSEE 






ee et td ts at ood 


M—EWUIN =O OONOUSWN =O 
So 


S555-65-5556. 


010001 
103365 
011137 


So 
= 
oa 
py 
Lal 
~N 


ANN 


So 

= 

o 
ad od No od 
ANN ONG 


S 
SSeS 
AAO 
WWWWW 


=S 
mo 


006572 


o 
oo 
— 
~ 
wa 
—™ 


ISSR VGRSSSeeer 


MPLS 


037061 10$: 
ENDIT: 





SEQ 111 

30A(1052) 23-MAR-82 16:43 PAGE 112 

1ZE SECTION 
MOV RO,R1 

BNCOMPLETE GETPRM y1F NO P=TABLE AVAIL., GO GET NEXT ONE 
Bcc GETPRM 

MOV (R1) ,FHDPLX ;PUT FULL OR HALF DUPLEX ANSWER IN LOC. 

sDEVICE DEPENDENT PART OF GETTING INFO FROM P-TABLE 

MOV 2(R1) ,RXCSR sSTORE AWAY CSR ADDRESSES 

MOV 2(R1) ,PCSAR 

ADD PCSAR 

MOV 2(R1) ,RDSR 

ADD #2,RDSR 

MOV 2(R1), TXCSR 

ADD #4, TXCSR 

MOV 2(R1), TDSR 

ADD #6, TDSR 

MOV 4(R1), INVEC :STORE AWAY INPUT INTERRUPT VECTOR 

MOV 4(R1) ,OUTVEC 

ADD #4, OUTVEC ;BUILD OUTPUT INTERRUPT VECTOR 

MOV 6(R1), INTPRI [STORE AWAY INTERRUPT PRIORITY 

MOV 14(R15 ,RNODE [STORE AWAY THE REMOTE NODE TYPE 

MOV 10(R1) ,.MPPTP [MULTI-POINT = 1 

BNE 10$ [IF MTP THEN GET TRIB ADDRESS FROM P-TABLE 

MOVE #1 TRIBN :PTP TRIB ADDRESS ALWAYS 1 

MOVB 12(R1),TRIBN “STORE AWAY TRIB NUMBER 

SETVEC CLKVEC,#CLKINT,#340 :SETUP CLOCK VECTOR 
MOV 340,-(SP) 
MOV ACLKINT,-(SP) 
MOV CLRVEC =< 
MOV #3,-(SP) 
T CSSVEC 
ADD #10,SP 

:DEVICE DEPENDENT VECTOR SETUP 

SETVEC INVEC,#DVRX1,#PRIO4 :SETUP INPUT INTERRUPT VECTOR 
MOV #PR104,-(SP) 

#DVRXI.-(SP) 

MOV INVEC ,-(SP) 
MOV #3,-(SP) 
TRAP css C 
ADD #10,SP 

SETVEC OUTVEC,#DVTXI.APRI04 § :SETUP OUTPUT INTERRUPT VECTOR 
MOV #PR104,-(SP 
MOV #OVTX1,-(SP) 
MOV TVEC, =( 
MOV #3,-(SP) 
TRAP CSSVEC 
ADD #10,SP 


CVCLHC_DPV-11_ DATA COMM. LINK TEST 


CVCLHC.P11 22-MAR-82 11: 
7 012700 000000 
Se 104441 

1633 

46 Hints 
i638 0 

4639 

re rs 


ie sas 


026 s 104411 


1 9 


SETPRI #PRI00 


EXIT INIT 


-EVEN 
ENDINIT 


23-MAR-82 16:43 PAGE 113 


3SET THE “'RUN’’ PRIORITY TO 0 
MOV 


TRAP 


TRAP 
«WORD 


L10012: 


SEQ 112 


CSINIT 


CVCLHC_DPV-11_ DATA on LANK TEST 
CVCLHC.P11 22-MAR~82 11: 


0262 
0262 


026234 
pce s¢ 
026234 104461 


J9 


MACY11 a SST TR 23-MAR~82 16:43 PAGE 114 
AUTODROP SECTION 


~SBTTL AUTODROP SECTION 


+ 

THIS, CODE, is EXECUTED ee aL AFTER THE os Me aes CODE IF 
THE LAG WAS SET. THE UNIT(S) UNDER TEST ARE CHECKED TO 
SEE IF THEY. WILL RESPOND. THOSE THAT DON'T ARE TPPEDIATELY 
DROPPED FROM TESTING. 


BGNAUTO 
LSAUTO:: 


ENDAUTO 
L10013: 


TRAP 


CSAUTO 


SEQ 113 


CVCLHC Y's 
CVCLHC.P11 


4661 


SSSReeEs 


SeeSseets 


e833 


naere 


$s 


026310 


Seesi4 
° 6316 


ATA aS a LaNK 


$36320 000002 


026322 
026322 


96 026322 


104412 


kK 9 


ON CONTAINS THE CODING THAT IS PERFORMED 


TEST MACY11 30A(1052) 23-MAR-82 16:43 PAGE 115 
CLEANUP CODING SECTION 
.SBTTL CLEANUP CODING SECTION 
2 THE CLEANUP CODING SECT I 
;_AFTER THE HARDWARE TESTS HAVE BEEN PERFORMED. 
BGNCLN 
CLR @CLKCSR 
SETPRI #PR1O7 
003010 CMP WEXIT,KEYWD1 
BEQ EXITCLN 
z:L0G “C ABORT IN EVENT LOG 
0065 MOV #ABO, TEMP 
006544 MOV OPVAR, TEMP4 
00654 MOV PSCNT. TEMP2 
00654 MOV ERRCNT, TEMP3 


JSR PC,LOGSS 
EXITCLN:BRESET 


EXIT CLN 


~ EVEN 
ENDCLN 


LSCLEAN:: 
sDISABLE CLOCK 
SET PROCESSOR PRIORITY BACK TO a 
TRAP 
3: "EXIT® COMMAND ? 
7 YES BRANCH 
sEVENT TYPE 
sSTART TIME OUTS 
PASSES 
ERRORS 
:60 LOG IT 
sRESET 
TRAP 
TRAP 
WORD 
L10014: 
TRAP 


SEQ 114 


#PRI07,RO 
CSSPRI 


CSRESET 


CSEXIT 
L10014-. 


CSCLEAN 


Ll 9 


SEQ 115 
CVCLHC DPV-11 DATA COMM. L NK TEST MACY11 30A(1052) 23-MAR=82 16:43 PAGE 116 
CVCLHC.P11  22=MAR-82 11: DROP UNIT SECTI 
4697 .SBTTL DROP UNIT SECTION 
38 
4 2 THE DROP=UNIT SECTION CONTAINS THE CODING THAT CAUSES A DEVICE 
4701 ;_T0 NO LONGER BE TESTED. 
tho2 6324 A BGNDU 
4705 oc6 3st L$DU:: 
4706 
4707 
4708 026324 EXIT DU 
4709 324 000167 .WORD JSJMP 
4710 056356 000000 “WORD 10015-2-. 
471 
471 EVEN 
4714 
4715 026330 ENDDU 
4716 026330 L10015: 


4717 026330 104453 TRAP C$DU 


m9 


SEQ 116 
CVCLHC_DPV-11 DATA com LINK TEST MACY11 a 2 23-MAR=82 16:43 PAGE 117 | 
CVCLHC.P11 22-MAR=82 11:09 ADD UNIT SECT C' 


4718 -SBTTL ADD UNIT SECTION 


3+ 

; THE ADD-UNIT SECTION CONTAINS ANY CODE THE PROGRAMMER WISHES 
; TO BE EXECUTED IN CONJUNCTION WITH THE ADDING OF A UNIT BACK 
TO THE TEST CYCLE. 


4726 026332 EGNAU 
4727 026332 LSAU: : 


= 
~“ 
Setete® 


4730 026332 EXIT AU 
4731 026332 000167 WORD JSJMP 
4732 026334 000000 -WORD 110016-2-. 


4735 -EVEN 
4737 026336 ENDAU 


4738 026336 L10016: 
4739 026336 104452 TRAP CSAU 






ag 


wn 


BRRARRRRRR REPRE RRR ES 





CVCLHC DPV-11 
CVCLHC.P11 


ATA COMM. L RK TEST 


22-MAR-82 


013777 


012746 
4 2746 


1 
er 


005737 
001112 


$y 





11: 


006630 160252 


1 006640 
0 


014226 
000001 


000004 
006564 


530 


3 
4 


006244 006444 


He 
mo = 





meer ase) 23-MAR=82 16:43 PAGE 118 
E SETUP AND MODES OF OPERATION 


-SBTTL TEST 1: 


s+t 
; TEST TO DETECT FAULTS IN THE DATA COMMUNICATION LINK. 
; THE PROVIDE COVERAGE NECESSARY TO ISOLATE FAILURES TO 
; EQUIPMENT, THE COMMUNICATION LINK, OR THE MODEM. 






Nn 9 





SEQ 117 







SETUP AND MODES OF OPERATION 








THIS TEST WILL 
THE COMPUTER 






PROGRAM SETUP SECTION 
CLKEN,@CLKCSR ;ENABLE THE CLOCK 













R1 

#1, TIMER1 :SET TIMER TO COUNT 1 TICK 

TIMER1 :CHECK FOR IT TO BE COUNTED OFF 

GT SBRANCH IF CLOCK EXISTS (COUNTED A TICK) 

1$ :KEER CHECKING UNTIL R1 pboes FULL COUNTDWN 

#NOCLK PRINT BAD CLK MSG AND WARN OF HANG IF TIMEOUT 
MOV K,-(SP) 
MOV "7 Flevtsb) 
MOV SP-RO 
TRAP  CS$PNTF 
ADD #4,SP 

RESFLG 7SEE IF HERE AFTER A RESTART. 

GT 7BR IF HERE CAUSE OF A RESTART 





COUNTS AND SET UP DEFAULTS 
TOTCC sCLEAR TOTAL CHAR. COUNT TEMP. LOC. 





TOTCC CLEAR TOTAL CHAR. COUNT FOR CMP BUFF 
oy eeonant SINIT TRANSMIT MESSAGE POINTER 


RXPTR 3 ZERO RX POINTER 


#PTR1I3,CMPPTR ;INIT COMPARE MESSAGE POINTER 

5 .MSGTYP :SET UP DEFAULT MSG TYPE (QUICK FOX - ITEP MSG) 
mses CURCC [SET UP DEFAULT CHAR COUNT 

#TXBUF,TCURAD :SET UP CURRENT ADD TO START OF TX BUFFER 
SCHPBUE ECURAD 3SET UP CURRENT ADD TO START OF CMP BUFFER 
TCURAD , CURADD SETUP CURRENT ADDR TO TART OF TXBUF 
TXPTR, CPTR TUP \LURR NI A. NTER POINTER FOR TXBUF 

TABLE AN ae BUFFER 


ai Sut Sool rl MESSAGE ¢ 










B 10 





SEQ 118 
CVCLHC DPV-11 DATA COMM. LINK MACY11 30A(1052) 23-MAR=-82 16:43 PAGE 119 
CVCLHC.P11 22=-MAR-82 11: GRAM SETUP SECTION 
4798 
4799 026532 O13 7 006444 006524 MOV CMPPTR,CPTR :SET UP START OF COMPARE POINTER TABLE 
4800 026540 0137 g 52 006526 MOV CCURAD CURADD SET UP CURRENT ADDR. TO START OF CMPBUF 
4801 026546 01 906516 MOV SGTYP 
480, 8 6554 0137 5 162 00652 MOV MSG5C, CURCC 
4803 026 004737 02336 JSR /BLOBUF ;PUT DEFAULT MESSAGE INTO CMPBUF 
4804 0265 O12? 7 1 006446 MOV #1. CMPTOT [BUMP THE COMP MESG COUNT 
§ 026574 012737 3 006566 MOV #ACT ,MODTYP *SET DEFAULT MODE= ACTIV 
4806 026602 005037 006570 CLR = MLTYP 3SET DEFAULT MAINTENANCE LOOP 
4807 026606 O127 7 000001 006576 MOV #1,RPASS [SET UP DEFAULT "RUN PASS’ COUNT TO 1 
4808 026614 012737 000002 006574 MOV #2.PARAM *SET UP PROG. PARAMETERS = DATACHECKING ENABLED 
4809 : OPERATOR STATUS MSGS. PRINT OFF 
4810 026622 PRINTF #HLPO 
4811 026622 012746 012215 MOV #HLPO,-(SP) 
4812 026626 012746 000001 MOV #1,-(SP 
4813 026632 010600 MOV SP 
4814 026634 104417 TRAP  CSPNTF 
4815 026636 062706 000004 ADD #4,SP 
4816 0 S642 GTRAS: SETVEC INVEC,#DVRX1,4PRI04 :DEFAULT NON=PROTOCOL RX INTER. VECTOR 
4817 026642 012746 000200 MOV #PRI04,-(SP) 
4818 026646 01276 035554 MOV #DVRXI.-(SP) 
4819 026652 013746 011464 MOV EC,-( 
4820 026656 012746 000003 MOV #3,-(SP) 
4821 02 104437 TRAP VEC 
4822 02 062706 000010 ADD #10, 
4823 026670 042737 000300 006574 BIC #PRORUN ! ABORT , PARAM s INIT PROTOCOL VARIABLES 
4824 026676 013737 006566 007706 MOV MODTYP,DEV1 
4825 026704 013737 006570 007710 MOV MLTYP -DEVE 
4826 026712 013737 006576 007712 MOV RPASS . DEV 
4827 026720 013737 006574 007714 MOV PARAM, DEV4 
8 026726 004737 023712 JSR PC, SHWOP ;PRINT TO OPERATOR THE CURRENT MODE...... 
4830 026732 MANUAL :SEE IF MANUAL INTERVENTION ALLOWED 
4831 026732 104450 SMANI 
026734 BCOMPLETE GETCL ; ®BR IF YES (UAM=0 AND NOT CHAINED) 
4833 026734 103412 BCS GETCL 
026736 005737 006576 TST RPASS ;SEE IF THIS IS FIRST “DCLT PASS" 
4835 026742 001002 BNE 1$ ; BR IF NOT COMPLETED 1 PASS 
4836 026744 EXIT TST : IF DONE 1 PASS IN UNATTENDED MODE = EXIT 
TRAP CSEX 


1 006570 1$: MOV #TTL.MLTYP SET UP DEFAULT FOR UNATTENDED MODE 
026756 000137 JMP GTR9 3 ‘'R M=ACT/LO=I1/PAS=1/NOST/CH’* AND RUN 


-SBTTL COMMAND LINE FETCH & INTERPRETATION SECTION 
026762 7 GETCL: CLRB P$GDBD sCLEAR CMD LINE PARSING ERROR FLAGS 
026766 46 


105037 LRB PSNNUF 
GMANID CLISPM,CMDBUF ,A,~1,1,72.,NO 3GET A COMMAND LINE FROM OPR. 
009406 TRAP 


4849 
ae 





C 10 


SEQ 119 
CVCLHC DPV-11 DATA COMM. LINK TEST MACY11 30A(1052) 23-MAR-82. 16:43 PAGE 120 
CVCLHC.P11  22=-MAR-82 11: COMMAND LINE FETCH & INTERPRETATION SECTION 
4854 027010 000110 .WORD TSHILIM 
4855 aa 10000$: 
485 9 701 on 737 002666 003132 MOV #CMDBUF ,PSBUFA 
485 70 12737 007716 003134 MOV ACLITRE .PSTREE 
4858 9270 6 012737 027736 003136 MOV #CLIACT.PSACT 
4859 005037 00301 CLR QUALFG sCLEAR QUALIFIER FLAG LOCATION 
4860 027040 004737 024244 JSR PC ,PSTRV 760 PARSE COMMAND LINE 
4861 027044 105737 003147 TST8  PS$GDBD ‘SEE IF PARSED OK OR AN ERROR 
4862 027050 001412 BEQ $ 
4863 02705 PRINTF #CLIERM 
4864 02705 012746 011605 MOV #CLIERM,=(SP) 
4865 027056 012746 000001 MOV #1,~(SP5 
4866 027062 010600 MOV Pp. 
4867 027064 104417 TRAP  CSPNTF 
4868 027066 062706 000004 ADD #4,SP 
4869 027072 000137 026762 JMP GETCL 
4870 027076 105737 003146 1$: TSTB - P$NNUF :SEE IF INCOMPLETE COMMAND TYPED 
4871 027102 001412 BEQ 10$ 
4872 027104 PRINTF #CLINUF 
4873 027104 012766 011635 MOV #CLINUF ,-(SP) 
4874 027110 012746 000001 MOV #1,-(SP5 
4875 027114 010600 MOV ; 
4876 027116 104417 TRAP  CSPNTF 
4877 027120 062706 000004 ADD #4,SP 
4878 027124 000137 026762 JMP GETCL 
4880 027130 023727 003010 000060 10$: § CMP KEYWD1,#SETET ;WAS''SET EXPECT=TRANSMIT’’ TYPED ? REVB EC 
4881 027136 001711 BEQ GETCL [YES BRANCH REV B EC 
4882 027140 023727 003010 000005 CMP KEYWD1,#HLP [SEE IF HELP WAS TYPED 
4883 027146 001705 BEQ L 760 GET CMD AGAIN IF YES 
4884 027150 023727 003010 000055 CMP KEYWD1,#PRNT [SEE IF PRINT WAS T 
4885 027156 001701 BEQ GETCL : GO GET CMD AGAIN IF YES 
4886 023727 003010 000004 CMP KEYWD1,#RUN [SEE IF RUN TY 
4887 027166 901002 BNE 11$ : BR IF NO 
4888 027170 137 031734 JMP GTRO + START EXEC. IF YES 
4889 027174 02 727. 003010 000052 11$: CMP KEYWD1,#DMPS *SEE IF OUMP WAS TYPED 
4890 1 BNE : BR IF NO 
4891 023126 JSR PC ,DUMPSR > ELSE, DUMP PART OF MEMORY 
4892 02676 JMP GETCL : THEN RETURN TO GET ANOTHER CMD. 
489 003010 000057 12$: CMP KEYWD1 ,#EXIT TEXIT ? REV B EC 
4894 BNE 13$ *NO,BRANCH REV BE 
4895 000001 006562 MOV #1,DCLFLG *SET CLEANUP FLAG REV B EC 
439% EXIT TST :60 BACK TO INIT REV B EC 
489 TRAP CSEXIT 
4898 «WORD 110017-. 
4900 003010 000001 13$: CMP KEYWD1,#CLEAR :SEE IF CLEAR WAS TYPED 
4901 BEQ GETCL : IF YES, BACK TO GET ANOTHER CMD. 
is oe ee FF HesS'Rkct MO EEF women cm 
4904 003010 000010 4$: CMP KEYWD1,#SETEXP *SEE IF SET EXPECTED 
4903 3 ei BEG Seeger : BR IF YES (A SETEXP WAS TYPED) 
4907 £08286 ian CMP TOTCC.ABUFLIM :SEE IF BUFFER ALREADY FULL 
4908 BLT 15$ : BR IF NOT FULL (BUFLIM # OF CHARS.) 
4909 PRINTF #MSGTRN,#BUFEX + ELSE TELL OPR. AND DON'T BUILD MSG. 





1 | 
a ‘ SEQ 120 | 


CVCLHC DPV-11_ DATA COMM sd TEST MACY11 30A(1052) 23-MAR-82. 16:43 PAGE 121 
i1 COMMAND 


CVCLHC.P11  22=-MAR-82 LINE FETCH & INTERPRETATION SECTION 
4910 1 746 1434 MOV #BUFEX,-(SP) 
4911 10 1sree 1336 4 MOV #MSGTRN,-(SP) 
491 14 01276 2 MOV #2,-(SP5 
4913 0 1 MOV SP.RO 
4914 0; 0441 TRAP  CSPNTF 
4915 027324 ADD #6,SP 
4916 0 1 267; JMP GETCL 3 THEN GO GET_A NEW COMMAND 
4917 0 7 $68 15$: st Troree SIF FIRST SET’ THEN GET RID OF DEFAULT 
4919 0 3037 0064 CLR TXMTOT 
4920 0 12737 006150 006442 6S: MOV #PTRTAB, TXPTR :GET POSITION OF END OF TX LIST 
4921 0 13701 00646 MOV TXMTOT,R1 
4922 0 020127 00001 CMP R1,4MSGLIM :SEE IF MSG COUNT EXCEEDED. 
4923 02 002414 BLT I 
4924 027366 PRINTF #MSGTRN,A#TABEX : ELSE TELL OPR. AND DON'T BUILD MSG. 
4925 027366 012746 014307 MOV #TABEX. ~(SP) 
4906 027372 012746 014365 MOV #mSGTRN (SP) 
4927 027376 012746 000002 MOV 2.-(SP5 
4928 027402 910600 MOV 
4909 027404 10441 TRAP aa 
49 027406 062706 000006 ADD 
4931 027412 000137 026762 JMP GETCL : THEN GO GET A NEW COMMAND. 
4932 027416 006301 17$: ASL R1 7# OF MSGS *4 = NEXT FREE PTR BLOCK 
4933 0274 1 ASL R1 
4934 027422 0601 7 00644 ADD R1,TXPTR 
4935 027426 137 7 00644 524 MOV TXPTR, CPTR sSETUP CHAR. COUNT, CURRENT ADDR, & PTR 
4936 027434 013737 0064 526 MOV TCURAD , CURADD 
4937 027442 004737 Os $05 JSR PC ,ADDCC sADD IN CHAR. COUNT AND CHECK TOTAL 
4938 027446 004737 023 JSR PC.BLDBUF [G0 BUILD MESSAGE IN BUFFER AND PTRS. 
4939 027452 013737 006524 006442 MOV cPiR TXPTR 
4940 027460 013737 006530 006464 MOV TOTCC, TTOTCC SUPDATE CHAR. COUNT, CURR ADDR, & PTR 
4941 027465 013737 006526 006466 MOV CURADD , TCURAD 
4942 027474 005237 00646 INC TXMTOT 
4943 027500 005337 003014 DEC QUALVL :DEC THE COPY COUNT 
4944 0275064 00127 BNE 5$ 
4945 027506 000137 025762 JMP GETCL 
4947 027512 013737 006450 006530 2s: MOV CTOTCC, TOTCC :SETUP CHAR. COUNT, CURR. ADDR. & PTR 
4948 027520 023727 006530 001000 CMP TOTCC ,#BUFLIM *SEE IF BUFFER ALREADY F 
4949 027526 002414 BLT 16$ : BR IF NOT FULL CBUFLIM # OF CHARS.) 
4950 0275 PRINTF #MSGTRN,#BUFEX : ELSE TELL OPR. AND DON'T BUILD MSG. 
4951 0 75 o1 746 014347 MOV EX,-(SP) 
495 75 127 14365 MOV #MSGTRN,~(SP) 
4953 027540 01276 2 MOV #2,-(SP5 
4954 027 01 MOV SP 
4955 027546 10441 TRAP  CSPNTF 
4996 927550 7 ADD #6,SP 
495 7554 1 2676 JMP GETCL : THEN GO GET A NEW COMMAND 
4958 0 7560 005737 16$: TST crorce SIF FIRST ''SET’’ THEN GET RID OF DEFAULT 
4959 027564 901008 BNE $ 
4960 0 ie 503? 006446 = CLR CMPTOT 
4 0 7572 012737 244 006444 MOV #PTR13,CMPPTR sINIT COMPARE MESSAGE POINTER 
rh 7604 ! 19} 13 CRP CPTOT ARI SEE IF MSG COUNT EXCEEDED 
4965 O55610 2414 BLT 18 : BR IF NO 
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SEQ 121 
CVCLHC DPV-11, ATA. COMM, 5 ANK TEST MACY11 30A(1052) 23-MAR-82 16:43 PAGE 122 
CVCLHC.P11 : COMMAND LINE FETCH & INTERPRETATION SECTION 
PRINTF #MSGTRN,#TABEX : ELSE TELL OPR. AND DON'T BUILD MSG. 

re 12746 14 307 MOV ATABEX,=(SP) 

S| 76) 16766 MOV #MSGTRN,-(SP) 
MOV #2,-(SP5 

; MOV SP.RO 
a3r1 8596 e tee — CaPutr 
4973 027 198 89 Bree JMP GETCL : THEN GO GET A NEW COMMAND. y 
4974 0 264 006 ] 18$: ASL Ri :# OF MSGS *4 = NEXT FREE PTR BLOCK 
4976 027 137 44 ADD R1,CMPPTR 
i909 0 7es2 oir 7 vere 006524 MOV CMPPTR,CPTR 
4978 027 0137 7 006432 006526 MOV CCURAD, CURADD 
4979 027 7 02 364 JSR PC ,ADDCC yADD IN XHAR. COUNT AND CHECK TOTAL 
4980 027672 004737 023 JSR PC BLDBUF 
438 885960 posse oocate my ein cawete 
1988 027710 O1 3737 Oos3e6 006452 MOV CURADD ,CCURAD ;UPDATE CHAR. COUNT, CURR ADDRR. & PTR 
4984 027716 013737 0065 006450 MOV TOTCC,CTOTCC 
4985 0 f 4 005337 14 DEC QuaLvi i1F fon WAS GIVEN, PUT MSG IN BUFF 
4987 027732 000137 026762 JMP GETCL 760 BACK UNTIL GET A "RUN" 
4989 
4990 
4991 
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SEQ 122 
CVCLHC DPV-11 DATA COMM. LINK TEST MACY11 30A(1052) 23-MAR-82 16:43 PAGE 123 
CVCLHC.P11 22=MAR-82 11: COMMAND LINE FETCH & INTERPRETATION SECTION 
4993 
4994 .SBTTL ACTION TABLE AND ROUTINES , . 
4995 : USER MUST CLEAR/SET P$GDBD IF USE “‘CLIBIF'’ IN CONNECTION WITH ACTION 
4996 — R2 WILL HOLD ACTION CODE FROM PARSING (CLI) NODE 
4998 8 7136 00630 ASL R2 | sMULTIPLY ACTION CODE BY 2 
4999 027740 01 3 027754 MOV 10$(R2) ,R2 [OFFSET VALUE 
5000 027744 7754 ADD #10$,R2 tADD BASE VALUE 
1 02775 71 JSR PC, (R2) 760 DO ACTION 
300 02775 20 RTS PC [RETURN TO TRVACT: 
5004 sBRIEF DESCRIPTION OF ACTONS TAKEN 
5005 027754 00015 10$: | .WORD ACTNUL-10$ : 
5006 027756 00015 “WORD ACTCLR-10$ CLEAR 
5007 027760 0001 “WORD ACTSHO-10$ + SHOW 
5008 027762 0015 "WORD ACTCHK-10$ + CHECK 
5009 0277 900262 “WORD ACTRUN-10$ RUN 
5010 027766 00017 “WORD ACTHLP-10$ SHELP 
“11 0. 900506 “WORD ACTCSE=1 [CLEAR OR SHOW EXPECT 
01¢ 0 "WORD ACTCST-10$ [CLEAR OR SHOW TRANSMIT 
5013 027774 ree “WORD ACTSTE=1 :SET EXPECT 
5014 027776 0007 “WORD ACTSTT-10$ ‘SET TRANSMIT 
5015 030000 000750 "WORD ACTSZE-10$ SIZE 
5016 030002 000760 “WORD ACTCOP-10$ COPY 
5017 0 900770 “WORD ACTNUM-10$ [NUMERIC VALUE FOR SIZE OR COPY 
5018 0 1 “WORD ACTOPM-10$ [QUOTED MESSAGE FROM USER 
5019 030010 001556 “WORD ACTSTS-10$ STATUS 
5020 030012 00110 "WORD ACTEQO-10$ SEND OF QUOTED MESSAGE FROM USER 
5021 030014 0011 “WORD ACTMSO-10$ ZONES AS DA 
3022 030016 0011 “WORD ACTMS1-10$ SZEROS AS DATA 
5023 030020 001 “WORD ACTMS 108 [1ALT AS DATA 
5024 030022 001 10 “WORD ACTMS3-1 S0ACT 
5025 030024 001 20 “WORD ACTMS4-10$ SITEP AS DATA 
5026 0 001 “WORD ACTMS5-10$ [CCITT AS DATA 
5027 0 001246 “WORD ACTMS6-10$ SALPHA AS 
5028 0 001334 “WORD ACTATV-10$ SACTIVE MODE 
3029 0 001 “WORD ACTPAS=1 PASSIVE 
0300 1 “WORD ACTREC-1 SRECEIVE MODE 
5031 03004 1 “WORD ACTLIS-10$ SLISTEN MOD 
50. 140 WORD TDLL-10$ SDOWNLINE LOAD 
503 0 141 “WORD TTRA=1 STRANSPIT MODE 
16e “WORD ACTTAL=1 “TALK MODE 
5 14 WORD TNO=1 ‘NO IE /NOCHECK 
5 14 “WORD  ACTEC [ECHO 
0 300 1564 “WORD ACTCRC-1 CRC 
1 “WORD ACT SPROTOCOL 
1 “WORD ACTRPS=1 :STATU 
164 ; ACT [SATELLITE IN MAINTENANCE LOOP MODE 
504 165 “WORD ACTTLP=1 SINT TT 
1 “WORD ACTCLP-1 ; 
167 “WORD ACTLLP=1 [LOCAL MODEM LOOP 
1 “WORD ACTRLP=1 SREMOTE MODEM LOOP 
5 7 14 “WORD ACTNUF-1 *MORE COMMAND NEEDED 
7 114 “WORD ACTBCR-1 SBAD CHARACTER IN OPERATOR MESSAGE 
1 56 "WORD ACTDMS-1 [DUMP MEMORY START ADDRESS 
10 06 “WORD ACTDME~1 [DUMP MEMORY END ADDRESS 


G 10 
CVCLHC_DPV-11 DATA nn - TEST MACY11 Spat Sse? 23-MAR-82 16: > PAGE 124 


CVCLHC.P11 22-MAR 11: ON TABLE AND ROUTINE 
5049 104 7 -WORD ACTDMQ-1 3 DUMP _WORD 
5050 1 ¢3 eWORD ACTPRT=1 PRINT 
o08) 11 157, ~WORD ACTMOS-10$ ;MODEM_ STATUS 
S2 03011 36 eWORD ACTEXT-10$ EXIT ROUTINE REV B EC 
5053 030114 001272 eWORD ACTSEX-10$ ;SET EX=TR REV B EC 


5054 


SEQ 123 


CVCLHC_DPV-11 
CVCLHC.P11 


5 
30124 


BSE 


ero 


—t os 


2benanse2 1:09. 


Bae 
a 


36 012737 


207 
012702 


013746 


012746 


012737 
000207 


177777 
000001 
000002 
003016 


012273 
000002 


508 003036 


000005 


012737 000055 
004737 
000207 





TEST 


003146 
003010 


003010 


003010 
003010 


003010 


003010 
003146 
006576 


006444 


000002 
006446 


44 
524 


000002 
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MACY11 Spat Teese ere e chaes 243 PAGE 125 


ACTNUF: MOVB 


ACTNUL : 
ACTCLR: 


ACTSHO: 


ACTHLP: 
1$: 


ACTEXT: 


ACTPRT: 


ACTRUN: 


ACTCSE: 


ACTCST: 


RTS 


Ss 


INTF 


TABLE AND R 

#~1 , PSNNUF 

PC 

#CLEAR ,KEYWD1 
PC 


#SHOW,KEYWD1 
PC 


#HLPTAB,R2 
#HLPF , (R2)+ 


R2,#HLPEND 
#HLP .KEYWD1 
PC 


#EXIT ,.KEYWD1 
PC 


#PRNT ,KEYWD1 
PC REPORT 


#RUN, KEYWD1 
#1, PSNNUF 
a »RPASS 


#PTR13,CMPPTR 
CMPPTR,R1 
CMPTOT ,.R2 

KE rer. o#SHOW 


SH 
#1,CMPTOT 
crorcc 


#pTRI3, CMPPTR 

CMPPTR.CPTR 
#CMPBUF ,R 

RI CEURAD 
ACTCLB 


oleh 
5,81 


Ke YWD1 ,#SHOW 
ACTSHW 


3SET FLAG TO SAY NEED MORE OF COMMAND 
;RETURN TO PARSER 


3SET LOC TO SAY A CLEAR WAS TYPED 
3SET LOC. TO SAY A SHOW TYPED 


SETUP R2 AS A POINTER TO HELP MSG TABLE 
;PRINT HELP INFORMATION MESSAGES 


MOV (R2)+,=(SP) 
MOV #HLPF . -(SP) 
mov #2,-(5P) 
TRAP _— CSPNTF 
#6,SP 


sSEE IF ALL aya A PRINTED YET 
IF NO KEEP PRINT 
7SET LOC. TO SAY A HELP WAS TYPED 


As COMMAND WAS INPUT REV B EC 
RETURN 


3SET LOC. TO SAY A HELP WAS TYPED 
3CALL ROUTINE TO PRINT EVENT LOG AND BASE TABLE 


3SET RUN FLAG 
3SET FLAG TO SAY NEED MORE OF COMMAND 
SET DEFAULT RUN "PASS’* TO 1 


zINIT COMPARE MESSAGE POINTER 


” 
mm 
= 
ore 
fee 
2 
= 
m 
xz 


MESSAGE POINTER 
L IN DEFAULT MESSAGE 


AT THIS PT. 
YPED 


SEQ 124 
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SEQ 125 
CVCLHC DPV-11 BATA, COMM LINK TEST MACY11 30A(1052) 23-MAR-82 718: 43 PAGE 126 
CVCLHC.P11 i1 ON TABLE AND ROU 
111 9 00 012737 006462 MOV #1, TXMTOT ;CLEAR TRANSMIT MESSAGE COUNT, CHAR. COUNT 
Ie Q 7 64 CLR TTOTCC + AND RESET POINTER 
113 030412 012737 150 006442 MOV #PTRTAB TXPTR 
114 0 13737 42 006524 MOV cBTR 
115 9 12701 15 MOV Koue CR 
116 010137 66 MOV MOURA 
118 0 1 2 ACTCLB: MOV #BUFL IM R2 
5119 9 101 526 MOV URABD :SET UP TO PUT DEFAULT MSG IN LIST AFTER 033'S 
1 12737 006516 MOV RS “Asery 
121 0 13737 002162 006520 MOV mSESC. LURCC 
1 g 0 05021 1$: CLRB ZFILL EXPT OR TRAN BUFFER WITH O'S IF A CLEAR 
31 ; 0 005 2 DEC Re [DO “BUFLIM'' NUMBER OF BYTE LOCATIONS 
| 5 930470 004737 023362 JSR PC ,BLDBUF : CLEARY REALLY MEANS TO PUT DEFAULT MSG IN 
312 30474 000207 RTS PC WHEN DONE, RETURN TO PARSER 
5128 
51 030476 012705 00307 ACTSHW: MOV #SHTAB,RS 
5130 030502 122571 5$: CMPB ss (R25) +, (R11) ;LOOK AT FIRST BYTE OF MSC TO DECIPHER TYPE 
5131 030506 001404 BEQ 
3132 030510 020327 003101 CMP R5,ASHTEND ;SEE IF LOOKED AT ALL OF DEFAULTS YET 
5133 030514 0013 2 BNE 5$ 
5134 03051 90320 INC RS :MUST BE OPR. SPEC'D THEN 
2139 030520 162705 003073 6$: SUB #SHTAB+1 RS 
136 030524 006 ASL R 
5137 030526 016137 000002 006534 2(R1), TEMP 
5138 0305 PRINTF #SHMSG,SHTYTB(RS),TEMP ;PRINT MSG SIZE & TYPE 
5139 0305 13746 34 MOV 
5140 030540 016546 00305 MOV SHTYTB(RS) .~(SP) 
141 030 12746 01350 MOV SP 
16g 030550 012746 MOV #3,-(SP 
143 030554 01 MOV 
144 030556 10641 TRAP  CSPNTF 
145 030 706 000010 ADD #10,SP 
146 030 701 000004 ADD #4,R1 sBUMP R1 TO NEXT SET OF POINTERS 
5147 0305 302 DEC R2 
5148 0305 1 BNE 
5149 030574 13737 566 ? MOV MODTYP,DEV1 
150 13737 5 771 MOV MLTYP, DEV 
151 030610 013737 57 771 MOV ; 
13¢ 16 13737 57. 771 MOV : 
15 ? 712 JSR PC, SHWOP sSHOW THE OPERATOR THE CURRENT MODE..... ALSO 
134 207 RTS PC 
136 30632 13737 3142 006510 ACTDMS: MOV PSNUM, STADD :SETUP STARTING ADDRESS FOR DUMP 
15 5037 51 CLR BYTBIT ?SET DEFAULT OF WORD DUMP 
138 30644 012737 003010 MOV #DMPS,KEYWD1 § :FLAG THAT A DUMP WAS TYPED 
159 30652 03 BR ACTDME 
161 030654 012737 177777 006514 ACTDMQ: MOV #-1,BYTBIT :SET DUMP FLAG TO "DUMP-WORD'’ 
16¢ 13737 00 142 006512 ACTDME: MOV PSNUM, ENADD SETUP END ADDRESS FOR DUMP (=START IF NO "EEE" 
16 306 Wea 10 037 14 ACTDMX: CLRB = PSNNUF SCLEAR NOT-ENOUGH FLAG, ‘DUMP N-N/B"’ IS VALID 
164 74 7 RTS PC 
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SEQ 126 
CVCLHC DPV-11 DATA COMM. LINK TEST MACY11 30A(1052) 23-MAR-82 16:43 PAGE 127 
CVCLHC.Pi1 22=MAR-82 11: ACTION TABLE AND ROUTINES 
TS 030676 012737 000010 003010 ACTSTE: MOV #SETEXP,KEYWD1 
3169 Pe0rbe 03 ” BR ACTSTX © 
3171 030706 ot 737 900011 003010 ACTSTT: MOV #SETTRN,KEYWD1 
Ze 030714 12737 1 003014 ACTSTX: MOV #1, QUALVL ;SET UP DEFAULT COPY TO 1 (/COPY=0) 
273 30722 20 RTS 
5175 030724 012737 000012 003012 ACTSZE: MOV #SIZE,QUALFG 
2176 0 207 RTS PC 
5178 734 012737 000013 003012 ACTCOP: MOV #QCOPY ,QUALFG 
3179 030742 000207 RTS PC 
2180 030744 023727 003012 000012 ACTNUM: CMP QUALFG,#SIZE SEE IF A SIZE OR COPY TYPED 
2182 030752 1063 BNE 1$ *BR IF IT WAS A COPY 
5183 030754 005737 003142 TST PSNUM *CHECK TO BE SURE DIDN'T TRY SIZE=0 
5184 030760 001014 BNE 3$ : BR IF NO 
5185 0307 PRINTF #CLISEO 
5186 0307 on 746 012074 MOV #CLISEO,-(SP) 
2187 030766 012748 000001 MOV = #1, =(SPJ-, 
188 030 1 MOV SP.RO 
5189 030774 10441 TRAP  CSPNTF 
5190 03077 706 ADD #4,SP 
5191 031008 1127 ed 003147 MOVB = #-1,, PSGDBD sSEE ERROR-IN-CMD FLAG 
5198 031010 000411 BR 2 
3194 9 1906 015757 003142 006520 3S: MOV PSNUM, CURCC :IF A SIZE LOAD CURCC WITH BYTE COUNT 
195 0310 pogss 7? 003142 003014 1$: MOV PS$NUM,QUALVL § ;IF A COPY, LOAD COPY COUNT 
5196 031030 005237 003014 INC QUAL VL SINCREMENT SO FIRST DEC MAKES IT REAL # 
2197 031034 000522 2$: BR ACTMEX 
2199 031036 012737 7 006516 ACTOPM: MOV #7 .MSGTYP 
200 031044 010437 9063 MOV R4. TEMP sKEEP TRACK OF START OF QUOTED TEXT 
5201 031050 005237 5 INC TEMP + SO CAN CALC OPCNT AT END OF QUOTES 
20¢ 031054 7 RTS 
5 031056 01040 ACTEQO: MOV R4,R2 
2 1060 7637 534 SUB TEMP ,R2 
1 10 520 MOV R2,CURCC :CALC BYTE COUNT FOR QUOTED TEXT 
10 10237 166 MOV R2,OPCNT 
1074 01 5 MOV TEMP,R1 
11 1270 520 MOV F RS 
10 0311 121 1$: MOVB CRI tn + sCOPY QUOTED TEXT TO OPBUF 
12 03111 Dots 73 eS 
13 111 BR ACTMEX 
15 031114 ACTBCR: PRINTF A#CLIBCR sBAD CHAR. IN OPR. QUOTED STRING 
1 1114 01274 012027 MOV #CLIBCR,-(SP) 
1 11 127 1 MOV #1,-(SP5 
18 1124 01 MOV SP-RO 
! i" est 000004 He csPutr 
$f 1 iia, RTS PC 3 
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CVCLHC DPV-11 DATA COMM LINK MACY11 30A(1052) 23-MA°-82 16:43 PAGE 128 
CVCLHC.P11  22=MAR-82 11 ACTION TABLE AND ROUTINES 


SEQ 127 


3 006516 ACTMSO: MSGTYP 
5 BR ae) 
: 000001 ACTMS1: a a4 TYP 3SET MESSAGE TYPE = ALL ONES 
000002 ACTMS2: a as MSGTYP zSET MESSAGE TYPE = ONES & ZEROS 
000003 ACTMS3: we : zSET MESSAGE TYPE = ZEROS & ONES 
000004 ACTMS4: ' 3SET MESSAGE TYPE = CCITT 


ACTME 
000008 006 ACTMSS: § 3SET MESS TYPE = QUICK F 
2162 006 MSG5C,C ;SETUP DEFAULT SIZE FOR THIS TYPE 


BR ACTMEX 
ACTMS6: #6 .MSGTYP 3SET MESSAGE TYPE = ALPHA/NUM 
MSG6C , CURCC 7SETUP DEFAULT SIZE FOR THIS TYPE 


ACTME1: #64. CURCC ;SETUP DEFAULT SIZE FOR MSGO-4 
BR ACTMEX SBRANCH TO EXIT 


wy 
& 
So oCooooocoooooooo 


So 
CAA 
ai=d af 


: EC 
ACTSEX: ee |» Neal aera sDID WE A HERE FROM ‘SET E=""COMMAND? 
#) eomes 


BR ACTMEX : SUBROUTINE 
10S: PC FACSIMILE COPY TRANSMIT LIST TO EXPECT LIST 
#SETET .KEYUDI oer FLAG TO BEY USED IN T1: 


EXIT SUBROUTI 


031302 ACTMEX: PSNNU 3CLEAR NOT-ENOUGH FLAG 
031306 000207 R PC 
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SEQ 128 
CVCLHC DPV-11 DATA COMM. 5 bdNK NK TEST MACY11 30A(1052) 23-MAR-82 16: 43 PAGE 129 
CVCLHC.P11 22=MAR-82 9 ON TABLE AND ROUTINE 
$254 031310 012737 000003 006566 ACTATV: MOV #ACT MODTYP :MODE = ACTIVE 
38 2 BR ACTMOX 
2588 9 188 012737 002 006566 ACTPAS: MOV #PAS ,MODTYP :MODE = PASSIVE 
5258 a 3146 CLRB = PSNNUF *CLEAR NOT-ENOUGH FLAG 
5259 besos 57 CLR MLTYP :CLEAR MAINT LOOP TYPE 
2260 0 000207 RTS PC 
5 6e 0 031340 005037 006566 ACTREC: CLR MODTYP :MODE = RECEIVE 
263 1344 000417 BR ACTM2X 
asec 31346 012737 000006 006566 ACTLIS: MOV #LIS,MODTYP :MODE = LISTEN 
2 66 31354 000413 BR ACTMOX 
5268 031356 012737 000004 006566 ACTDLL: MOV #D0W,MODTYP yMODE = DOWNLINE LOAD 
2369 021 000407 BR ACTMOX 
5271 031366 012737 000001 006566 ACTTRA: MOV #TRA,MODTYP :MODE = TRANSMIT 
387 031374 000403 BR ACTMOX 
5674 031376 012737 000005 006566 ACTTAL: MOV ATAL .MODTYP :MODE = TALK 
5276 031404 042737 000004 006574 ACTM2X: BIC #ECHOB, PARAM sDISABLE /ECHO (ALL pur PASSIVE MODE) 
5277 031412 105037 003146 CLRB =—« P$NNUF :C NOT=ENOUGH FLAG 
5278 031416 005037 006570 CLR MLTYP [CLEAR MAINT LOOP TYPE 
5279 031422 000207 RTS PC 
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CVCLHC_DPV-11_DATA COMM, LINK TEST MACY11 30A(1052) 23-MAR-82 16:43 PAGE 130 
CVCLHC.P11 22-MAR-82 11:09 ACTION TABLE AND ROUTINES 


5281 031424 012737 000036 003012 ACTNO: MOY —#NO,QUALFG 


SEQ 129 


ad 
FUSS 


Ww 
tvs 
tet 


5284 031434 020737 000036 003012 ACTECH: CMP #NO, QUALFG 
5285 031442 0014 é BEQ 1$ 
5 86 031444 052737 000004 006574 BIS #ECHOB, PARAM 
5287 0. 1458 022737 000002 006566 CMP #PAS ,MODTYP :BE SURE IN PASSIVE MODE IF 
5288 031460 001416 BEQ ‘IF TRYING TO SET /ECHO 
5289 0 1462 PRINTF #CLINPS 
5290 031462 012746 011764 MOV #CLINPS,-(SP) 
5291 0 1466 ot 746 000001 MOV #1,-(SP5 
5 0314 1 MOV SP,RO 
529 031474 10441 TRAP - CSPNTF 
5294 031476 706 000004 ADD #4,SP 
5295 031502 112737 177777 003147 MOVB = #=1,P$GDBD 
5296 031510 042737 000004 006574 13: BIC #ECHOB , PARAM 
5297 031516 005037 003012 2$: CLR QUALFG sCLEAR "NO" OUT OF QUALIFIER FLAG 
2698 031522 000501 BR ACTLXX 
5300 031524 012701 000002 ACTCHK: MOV #DATCKB,R1 :SET DATA CHECK BIT 
3301 031530 000413 BR ACTOFG 
5303 031532 012701 000001 ACTSTS: MOV #STATB,RI1 :SET THE STATUS BIT 
3304 031536 000410 BR ACTOFG 
5306 031540 012701 000020 ACTCRC: MOV #CRCB,R1 sSET THE CRC BIT 
9307 031544 000405 BR ACTOFG 
5309 031546 012701 000010 ACTMOS: MOV #MOCHK,R1 sSET THE MODEM BIT 
2310 031552 000402 BR ACTOFG 
2312 031554 012701 000040 ACTPRO: MOV #PROTOB,R1 :SET THE PROTOCOL BIT 
5314 031560 050137 006574 ACTOFG: BIS R1,PARAM 
5315 031564 022737 000036 003012 CMP #NO, QUALFG 
2316 031572 901002 BNE 
5317 031574 040137 006574 BIC R1,PARAM 
2318 031600 005037 003012 1$: CLR QUALFG sCLEAR "NO" OUT OF QUALIFIER FLAG 
2319 031604 000450 BR ACTLXX 
5321 031606 013737 003142 006576 ACTRPS: MOV PSNUM, RPASS :GET NUMBER OF “RUN PASSES" 
3 4 031614 Ohees BR ACTLXX 
5324 031616 012737 000005 006570 ACTMOP: MOV #5,MLTYP 
5325 031624 17 BR ACTLPX 
; 1 73 000001 006570 ACTTLP: MOV 4 saute 
$8 1656 1 73? 000002 006570 ACTCLP: mov a6 ALTYP 
3 1646 $07 000003 006570 ACTLLP: MOV #3,MLTYP 

654 03 BR ACTLPX 

656 012737 000004 006570 ACTRLP: MOV #4,MLTYP 


— he 


000003 006566 ACTLPX: CMP #ACT MODTYP 3BE SURE IN ACTIVE IF TRYING TO SET LOOP 
ACTLXX ; BR IF IN ACTIVE 
177777 003147 MOVB #-1,PSGDBD 


oe 
en, 
~— 
_ 


CVCLHC DPV-11_ DATA C LINK TEST 
CVCLHC.P11 2 AWARCBS 11509 


d 10 : 005037 006570 
17 12746 011722 
171 O1874 1 
03171 

031720 104417 

031722 086706 000004 
ie 1050357 003146 
031732 000207 


nN 10 
MACY11 Spat TOse? 23-MAR=82 16:43 PAGE 131 


CTION TABLE AND ROUTINES 
CLR MLTY: 
PRINTF PELIBDL 


ACTLXX: cae * peed CLEAR NOT-ENOUGH FLAG 


SEQ 130 


CLEAR ANY LOOP TYPE THAT MAY HAVE GOT SET 


#CLIBDL,-(SP) 
#1,-(SPS 
CSPNTF 

#4,SP 


CVCLHC DPV-11 DATA COMM. LINK 
CVCLHC.P11 


rs 
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er 
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032014 
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0 
032140 
aE 
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“N 
rs 
AX 


22-MAR=82 11:09 


TEST 


006574 
006462 


006442 
006444 
006440 


006476 


B11 


SEQ 131 


MACY11 SpA 1022? 23-MAR-82 16: . PAGE 132 


CTION TABLE AND ROUTINES 


-REV B BY EC 
GTR: Ist , TYP 
eI #DATCKB,PARAM 
CMP CMPTOT, TXMTOT 
PRINTF #CLIPW 
JMP GETCL 
RX ALLOCATE CODE 
108: ov #PTRTAB, TXPTR 
MOV #PTR13,CMPPTR 
MOV #PTR23,RXPTR 
MOV CMPTOT ,RXMTOT 
GTREX: CLR FLAG 
CLR OPVAR 
CLR PSCNT 
CLR ERRCNT 
CLR MGLCNT 
CLR MHRCNT 
CLR 
MOV rey SYNCW 
BIS weir? DPVP1 
TST RNODE 
BEQ 1$ 
BIC #B1T7,DPVP1 
MOV #426, SYNCW 
1$: JSR PC, LOGDVI 
JSR PC. DVINIT 
GTRX2: MOV #BUFLIM, CURCC 
MOV #RXBUF , CURADD 
MOV RXPTR,CPTR 
MOV #10,MSGTYP 
JSR PC ,BLDBUF 
MOV MODTYP,R2 
ASL R 
JMP @MODE (R2) 


:LOOP MODE ? 

:NO, BRANCH 

DATA CHECK ? 

:NO,BRANCH 

tTX’= EX ? 

YES, BRANCH 

SPRINT WARNING 
MOV #CLIPW,-(SP) 
MOV #1,-(SP) 
MOV SP,RO 
TRAP  CSPNTF 
ADD #4,SP 

;TRY AGAIN 


sINIT TRANSMIT MESSAGE POINTER 
ZINIT CUMPARE MESSAGE POINTER 
ZINIT RECEIVE MESSAGE POINTER 


3MAKE COMPARE AND RX MESSAGE COUNTS EQUAL 

sCLEAR FLAG 

CLEAR OPTIONAL VARIABLE COUNTER 

[CLEAR PASS COUNT 

ZCLEAR ERROR COUNT 

ZCLEAR GLITCH COUNT 

7CLEAR HARD ERR. Sad 

7CLEAR LINE COUNTER 

3SET Up” SYNCU FOR 226 SYNC +TSOM 

7SET UP PARAM WORD FOR 226 RX SYNC 

iIF NON ITEP GO TO 1 

FOR 26 SY R 

ELSE SET UP SYNC_FOR 26 AND TSOM 
ABOUT TO INIT DEVICE 

SINIT DEVICE 


3SET CHAR COUNT TO *BUFLIM’’ NO. OF BYTES 
7SET UP RX BUFFER AS CURRRENT ADD. 


3SET UP_FOR 7, is FILL RX BUFFERS 
7CLEAR RX BUFF 


sMODE DISPATCH 


CVCLHC_DPV-11 
CVCLHC.P11 


23 


ATA_COMM. 
“MAR~82 11 


ry TEST 


006522 
006474 
006600 


¢ 11 


MACY11 79A(1052) 23-MAR-82 16:43 PAGE 133 
RECEIVE MODE SECTION 


oSBTTL RECEIVE MODE SECTION 
FUNCTIONAL DESCRIPTION: 
RECEIVE-ONLY (OR “WAY-IN) ROUTI 
THIS MODE OF TESTING ys BAS He hig hy 


A_MESSAGE. AF R 
SAGES, DATA RECEIVED CAN BE COMPARED AGA 
TO RECEIVE'’ MESSAGES IF DATA-CHECKING IS E 


SUBORDINATE ROUTINES USED: 
““ALLTR" 


SEQ 132 


ED IN EXPECTATION 
D** NUMBER OF 
A LIST OF “EXPECT 


CALLING SEQUENCE: 

JMP @MODE (R2) sDISPATCH TO MODE BASED ON MODE TYPE IN R2 
RXONLY: 
RXON2: MOV RXPTR,CPTRR 

MOV RXMTOT,DVRCT | ;SET UP MESSAGE COUNT 

BIS WORX+HERX,FLAG :SET UP RX QUE 

CLR CPTR [CLEAR THE TX POINTER 

JMP ALLTR '60 RX. 


dD 11 


SEQ 133 
CVCLHC DPV-11 BATA, COMM LINK TEST MACY11 30A(1052) 23-MAR=-82 16:43 PAGE 134 
CVCLHC.P11 i1: SMIT MODE SECTION 

$420 0 .SBTTL TRANSMIT MODE SECTION 
54 3¢ 

: FUNCTIONAL DESCRIPTION: 

4 : TRANSMI Y (OR ONE-WA ¥-OuT) ROUTINE 

5 : IN THIS MODE OF TEST ING A LIST OF MESSAGES IS TRANSMITTED WITHOUT 
54 6 ; EXPECTING ANY DATA TO BE RECEIVED. A REPETITION COUNT CAN BE 
24 i ; SPECIFIED TO RERETIVIVERY TRANSMIT THE LIST. 
34 ; SUBORDINATE ROUTINES, USED: 
5431 ; 
3432 : CALLING § SEQUENCE : 
2433 a DE(R2) sDISPATCH TO MODE BASED ON MODE TYPE IN R2 
5435 sd 
5436 032240 042737 000002 006574 TXONLY: Bic #DATCKB PARAM ;SET NOCHECK 
2235 32 46 O1$737 bneae 006524 TXONE! MO CPTR 
3438 32854 0137 7 006460 ator: DVTCT COPY COUNTER FOR THIS PASS 

62 052737 90021 Bis MOTX4+HETX,FLAG :SET THE QUE TX FLAG 

tip 03287 005037 0065 i. CLR CPTRR SCLEAR RX POINTER 
5441 032274 000137 jmp ALLTR :60 TX. 


CVCLHC DPV-11 
CVCLHC.P11 


5451 


LEE LE LES 
SSSENSALN 


BERER 


ATA COMM, LINK TEST 
22-MAR-82 11: 


Bosess 006554 
006522 


7 
7? 
73¢ oo0id 
000137 % 


E 11 


MACY11 30A(1052) 23-MAR-82 16:43 PAGE 135 
PASSIVE MODE SECTION 


.SBTTL PASSIVE MODE SECTION 
y FUNCTIONAL DESCRIPTION: 
: ASSIVE MODE SECTION 
: tN N THIS MODE OF TESTING, THE DEVICE'S {RECEIVER IS ENABLED IN 
; EXPECTATION OF RECEIVING A MESSAGE. THEN EVERY TIME A MESSAGE IS 
: RECEIVED, A MESSAGE IS TRANSMITTED. DATA CHECKING CAN BE DONE ON THE 
: RECEIVED DATA. 
: SUBORDINATE ROUTINES USED: 
: “ALLTR'’ 
; CALLING, § SEQUENCE : 
; @MODE (R2) sDISPATCH TO MODE BASED ON MODE TYPE IN R2 
PLCK: 
PLCK2: MOV TXMTOT.DVTCT | ;SET UP THE TRANSMIT COUNT 
MOV TXPTR, CPTR *SET UP CPTR TO TRANSMIT POINTER 
PLCK3: MOV RXPTR.CPTRR *SET UP CPTRR TO REC POINTER 
BIS #ORX*HERK, FLAG :SET UP Q@ AND E x 
JP ALLTR [AND GO RX FIRS . 


SEQ 134 


CVCLHC_DPV-71 
CVCLHC.P11 


opal ¢ 


at Tes 


Bosess osse4 
42 006524 
006476 006474 
006440 006522 
Beste 006600 
032376 


F 11 


MACY11 30A(1052) 23-MAR-82 16:43 PAGE 136 
ACTIVE MODE SECTION 


ACTIVE MODE SECTION 


SEQ 135 


-SBTTL 


"FUNCTIONAL BEScRIPTICH: 
CTIVE MODE SECTI 

tN N THIS MODE OF T 
MESSAGES ARE EX ia 3 


a RANSMITTED AND 
AGAINST ae i 


T 
ED par CAN BE COMPARED 


SUBORDINATE ROUTINES USED: 


“ALLTR" 
CALLING SEQUENCE: 
JMP @MODE (R2) :DISPATCH TO MODE BASED ON MODE TYPE IN R2 
ALCK: MOV TXNTOT DVTCT 
MOV ¢PTR :SET UP TX COUNTS 
MOV RUATOF abvRct :SET UP COUNTS 
MOV RXPTR 
BIS REN ABOTK ME TX*MERX.FLAG 
JMP ALLTR 


G 11 





SEQ 136 
CVCLHC DPV=11_ DATA COMM LINK TEST MACY11 30A(1052) 23-MAR-82 16:43 PAGE 137 
CVCLHC.P11 22=-MAR-82 TRANSMIT = RECEIVE FOR ALL STANDARD MODES 

5495 .SBTTL TRANSMIT = RECEIVE FOR ALL STANDARD MODES 

37 :* 

98 ; FUNCTIONAL DESCRIPTION: 

99 : THIS CODE PERFORMS THE FOLLOWING FUNCTIONS 

500 : 1.) IF RX BUFFERS ARE TO BE QUED, TELL DEVICE 

501 3 ODE TO QUE THEM ,LOG RECEIVE QUED. 
550 ; 2.) IF TX BUFFERS ARE tO BE QUED TELL * DEVICE 
550 : CODE TO QUE THEM, LOG TRANSMIT QUE 
2304 3 3.) WAIT FOR | EITHER REC IVE BUFFER OR RO TRANSMIT BUFFER OR 
2506 ; 4.) IF RECEIVE COMPLETE LOG IT UPDATE RX TABLE IF DATA 
550 : HECK 
5508 : 5.) IF TRANSMIT COMPLETE LOG IT. 
5509 : 6.) WHEN BOTH TRANSMIT AND RECIEVE LISTS ARE DONE 
210 3 GO TO THE COMPARE BUFFER CODE 
2518 ; SUBORDINATE ROUTINES, USED: 
551 3 "DVRXQ"* ECEIVE BUFFER SPACE TO DEVICE 
5514 ; Rxa '=LOG RECEIVE BUFFER SPACE TO EVENT LOG 
5515 ; "LOGTXQ"=LOG T IT BUFFER QUED TO EVENT LOG 
5516 : DVTXRX' =QUE TRANSAIT BUFFER AND WAIT FOR RX 
5517 : ; ,, OR TX TO COMPLETE 
5518 : ‘LOGRXC"=LOG RECEI VE BUFFER COMPLETED TO EVENT LOG 
3319 ; "LOGTXC’=LOG TRANSMIT BUFFER COMPLETED TO EVENT LOG 
5521 ; USE OF FLAG BITS: 
2528 : QRX = SET ON INPUT TO ALLTR IF REC IS TO BE QUED TO 
238 : DEVICE. CLEARED BY DVRXQ AND THEN SET BY DVTXRX 
524 ; WHEN RX BUFFER IS COMPLETED. 
5525 3 QTX = SET ON INPUT TO ALLTR IF TRANSMIT IS TO BE QUED TO 
5526 ; DEVICE, CLEARED ON ENTRY To DVTXRX AND SET BY DVTXRX 
5527 ; WHEN TX BUFFER IS COMPLET 
38 8 ; ETX = USED BY DVIXRX TO SETERAINE. IF TX BUFFER COMPLETED 1S 
22 ; ERX = USED BY DVTXRX TO DETERMINE IF RX BUFFER COMPLETED IS 
5531 : EXPECTED. 
22338 
5534 3 CALLING SEQUENCE: 
2535 3 JMP ALLTR 360 TO TRANSMIT-RECEIVE FOR ALL STANDARD MODES 
3337 

538 

539 376 ALLTR: 

540 376 032737 000004 006600 ALCKS: BIT WORX. FLAG 

541 4 1426 BEQ ALCKi z1F NOT RX GO TO TX'S 

34¢ 3 g 52 MOV CPTRR,R2 

54 41 1 54 (R2), TEMP2 

544 41 é 7 7 MOV (R2)+ DVRXA 

545 4 7 54 MOV (RO), TEMP 

346 4 1237 7 MOV (RO) -DVRCC 

54 4 0237 5 MOV R2,CPTRR 

248 4 ? 1 JSR PC; LOGRXQ i496 REC QUED 

54 4b 7 006574 10$: BIT #PROTOB PARAM /PROTOCOL/ ? 

550 4 1002 BNE ALCK1 [YES BRANCH 
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00210 


TEST 
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ALCK2: 


10$: 
20S: 


UPTABL : 


UPTA4: 


UPTA3: 
UPTA1: 


UPTEX: 
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MACY11 30A(1052) 23-MAR-82 16:43 PAGE 138 
RANSMIT 


SEQ 137 


= RECEIVE FOR ALL STANDARD MODES 


PC, DVRXQ 
#OTX. FLAG 
ALCK2 
CPTR,R2 
(R2), TEMP2 
(R2)+,DVTXA 
(R2), TEMPS 
(R2)+,DVTCC 
R2,CPTR 
PC,LOGTXQ 
#PROTOB,, PARAM 
10$ 


PROTOCOL 
rr sail »PARAM 


GTRAS 
PC ,DVTXRX 
#QRX .FLAG 


PC 

#€ CHOB , PARAM 

CPTR.R2 

TEMPS. (R32) 

TEMPS, (R2) 
ATCKB. PARAM 


#01, DVRCT 

RXPTR, CPTRR 

#ACT ,MODTYP 
TAS 


R2,CPTRR 
#PAS ,MODTYP 
ALCK2A 


K 
#OQRX+HERX , FLAG 
#QTX+#ETX FLAG 
ALCK1 


3GO QUE RX BUFFERS & ENABLE RX 
31F NO TX’'S GO TO 2 


3°/PROTOCOL *? 
3NO,BRANCH 
360 DO DDCMP MESSAGE PROCESSING 
sPROTOCOL ABORT? 


3NO,BRANCH 

zABORT! !AND RETURN TO "DCLT>* PROMPT 
G0 TO TX AND RX SUB ROUT. 

sCHECK FOR REC. MSG. 


COMPLETE 

ECHO MODE (PASSIVE) 

GO 10 4 

T R2 TO PRESENT TX fABL 
OFF RX ADD 
A CHECKING ASKED FOR 
TO 1 


SET DVRCT TOA 1 
sRESET POINTER 
31S THIS ACTIVE 


31F YES BUMP COUNT 


Sete te ee Sete tes 
o 


3LOAD TEMP WITH PREV. COUNT 

3LOAD TEMP WITH PREV. COUNT-CURRENT 
sSTORE OF NEW ADD 

sAND NEW CC 

3PUT POINTER BACK TO ADDR. 

zAND RESTORE IT. 


:1F NOT PASSIVE LOOP THEN GO TO 2A 
CLEAR BOTH EXPECTED AND COMPLETED FLAGS 
3SET THE TX FLAGS 


ae eer ATA aS a ool 


4 
‘ 1 = 
eer 
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re ese 
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MACY11 pe et 23-MAR-82_ 16:43 PAGE 139 


ALCK2A: 


ALCK3: 


ALCK3A: 


ee 


ALCK4: 


ALCK4A: 


ALCK4B: 


DVRCT 
DVRCT 


ALCK3 
#ORX, FLAG 
#OTX FLAG 
DVTXA, TEMP 
DVTCC, TEMP 
PC, LOGTXC 
ALCK3A 


#QTX*ETX FLAG 
ere oFLAG 


SR 
DVTCT 


RANSMIT = RECEIVE FOR ALL STANDARD MODES 


3DEC REC COUNT 
31S IT ALL_DONE 


sYES. CLEAR POINTER 
z1S IT_T 
:IF NOT TX THEN GO BACK 


3LOG TX COMPLETED 
sDEC TX COUNT 


z1F NOT wet? MODE GO TO 3A 
;CLEAR THE TX FLA 
SAND SET THE RX FLAGS 


:1F MORE RX°S DO IT 
; ELSE COMPARE 
S IT ALL DONE 

NOT GO BACK TO 5 


; IF 
;IF SO aw POINTER 
sCLEAR TX_FLAG 

71S IT DAT CK 

;I1F NOT THEN END WO CKING RX. 
31F SOME RX''S LEFT GO BACK 


3BRANCH IF ANY TX'S LEFT 


SEQ 138 


J 


MACY11 ALCS Seon cone 16:43 PAGE 140 
COMPARISON 


SEQ 139 
CVCLHC_DPV-11 
CVCLHC.P11 


ATA COMM. LINK TEST 
22-MAR=-82 11: 


B 


uapenenerennrenry 


3 


-SBTTL 


4 
FUNCTIONAL DESCRIPTION: 
CMPSR = COMPARE C 


DATA COMPARISON CODE 


ODE 
THIS CODE COMPARES THE RECEIVED DATA cao THE 


EXPECTED AND FILLS THE EVENT LOG WITH 1 


OF 3 MSGS. 


NOTE: IF NO DATA CHECKING SKIP THIS CODE 
1.) A_DATA COMPARISON ENTRY WHICH REPORTS THE NUMBER 


COMPARISON ERRORS FOUND. 
2.) A DATA COMPARISON ENTRY WHICH REPORTS DIFFERENCES 
IN REC LENGTH TO COMPARE L ° 
3.) ae DATA rte a p Nghe 2 A eae REPORTS ADDRESS 
THIS CODE ALSO REPORTS SOFT ERRORS FOR DATA COMPARISON 
(THE FIRST 5 ONLY),LENGTH ERROR,AND TOTAL NUMBER OF ERRORS 


SUBORDINATE ROUTINES USED: 


Be Se Se Se Ge Se Se Ge Be Se Ge Se Se Se Se Se Se Se Se Se Se Se Ge Se te Ge Se Se 
> 

wn 

bes | 

m 

z 


5665 
5666 “LOGCMP'' = SEE ITEM 3 ABOVE 
5667 LOGCML'' = SEE ITEM 2 ABOVE 
3668 “LOGCMD’’ = SEE ITEM 1 ABOVE 
5670 CALLING SEQUENCE: 
3671 JMP CMPSR ; JUMP TO DATA COMPARISON CODE 
7% 033164 032737 000002 006574 CMPSR: BIT ADATCKB,PARAM 1S DATA CHECKING TO BE DONE 
5675 033172 0015 3 BEQ CMPSEX :IF NOT THEN EXIT 
5676 033174 137 006440 006524 MOV RYPTR CPTR *PUT START OF RX POINTERS TO CPTR 
5677 0 3202 13737 006444 0065 2 MOV CMPPTR,CPTRR  : AND START OF COMPARE POINTS TO CPTRR 
2678 033210 013737 006476 4 MOV RXMTOT .DVRCT 
5680 035216 CMPS3: 
5681 03321 13798 524 MOV CPTR,R2 sMOVE CURRET RX PT.TO R2 
0 11 540 MOV (R2) . TEMP2 [MOVE RX ADD TO EVENT LOG 
12201 MOV (R2)4+,R 3SET R1 TO START ADD OF R 
9 1 3 7 006542 MOV (RO) +, TEMPS CHAR COUNT TO EVENT” LOG 
5 10237 52 MOV R2,CPTR tRESTORE RX POINT 
033240 01 702 006522 MOV CPTRR,R :PUT R2 AT COMPARE TABLE 
44 01 MOV (R2}*.R SSET R3 TO COMPARE ADD 
46 1 MOV (R2)+_R& *SET R4 TO COMP CC 
90 10237 $22 MOV SCPTRR SRESTORE POINTER 
1 3 54 010437 5 MOV R4, TEMPS 
4 60 7 244 JSR PC. LOGCMP :LOG COMPARE START. 
94 3 37 006542 CMP RG TEMPS 1S COMPARE COUNT = TO RX COUNT 
95 141 BEQ CMPS SIF SO GO TO 
% 3 5237 006506 INC ERRCNT 
9 7 ERRSOFT 1,EDDLE.ERR10  ;PRINT ERROR 


CVCLHC rs a. on st NK TEST 
CVCLHC.P11 
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MACY11 PA ee Sreon coke 16:43 PAGE 141 


CMPS7: 
CMPS1: 


CMPS2: 


CMPS6: 


CMPSS: 


CMPSSA: 


A COMPARISON C 
JSR PC,LOGCML 
CLR TEMPS 
MOV #1,0FSET 
c al ds, (R3)+ 
BEQ 
INC TEMPS 
CMP TEMPS #5 
BHI CMPS6 
MOVB  =(R3),GOOD 
MOVB = =(R1) 
INC ERRONT 
ERRSOFT 2,EDDDE,ERR1 
INC R1 
INC R3 
INC OF SET 
DEC R4 
BNE CMPS1 
TST TEMPS 
BEQ CMPSSA 
INC ERRCNT 
ERRSOFT 3,EDDDE,ERR2 
JSR PC,LOGCMD 
DEC DVRCT 
BNE CMPS3 


3LOG LENGTH ERROR 


sCLEAR BAD BYTE COUNTER 
3SET re aust COUNT TO 1 
OMPARE RX WIT 


LIF EQUAL THE 


so FOR MORE 

TORE GOOD BYTE FOR ERROR 
; STORE BAD BYTE FOR ERROR 
REPORT COMPARISON FAILURE TO ak 


RAP 
«WORD 
- WORD 
- WORD 


zINC_OFFSET 
iELSE DEC CHAR COUNT AND SEE IF 0 


F NOT 
7SEE IF ANY CMP ERRS FOR THIS MSG 
BR IF NONE 


sREPORT # OF MISMATCHES FOR reser 


RAP 
- WORD 
- WORD 
- WORD 


3LOG DATA ERROR IN COMPARE 


31F NOT ALL DONE GO BACK 


f SERSOFT 


EDDL 
ERR1 


ae T 
EDDDE 
ERR1 


paneer T 
EDDDE 
ERR2 


SEQ 140 


L 11 


SEQ 141 

CVCLHC DPV-11 DATA COMM. LINK TEST MACY11 Dh eats 16:43 PAGE 142 
CVCLHC.P11 22-MAR-82 11:09 DEM CHANGE REPOR 

He) -SBTTL MODEM CHANGE REPORTS 

5740 3+ 

5741 3 FUNCTIONAL DESCRIPTION: 

574 3 THIS SECTION yoy S$ THE NUMBER OF MOMDEM STATUS CHANGES 

574 3 OCCUR ON EACH PASS. THE ERROR IS ONLY REPORTED IF 

5744 3 THERE WERE ANY CHANGES IN OTHER WORDS A COUNT OF ZERO IS 

5745 3 REPORTED. C ES ARE REPORTED IN TWO C 

ofe6 3 ERRORS AND GLITCHES. HARD E S$ ARE WHEN THE DEVICE 

574 3 IS ABLE TO LA TH TATUS. GLITCHES OCCUR 

5748 : WHEN THE MODEM STATUS CHANGES TO CAUSE A 

5749 $ INTERRUPT BUT THE CHAN T OCCUR LONG 

3f30 3 THE DEVICE TO LATCH THE DATA 

575 : TS: a 

575 3 "MGLCNT’’ = CONTAINS NUMBER OF GLITCH ERRORS 

Her ; MHRCNT = CONTAINS NUMBER OF HARD ERRORS 

5756 3 OUTPUTS: - 

5757 5 ‘MGLCNT’’ “ZEROED BY THIS SECTION 

3728 3 MHRCNT -ZEROED BY THIS SECTION 

5760 33 

2768 033440 005737 011520 CMPSEX: TST MGLCNT :CHECK FOR ANY Te | pees 

5764 03 001003 BNE MCREP :IF NON ZERO REPOR 

5765 033446 005737 011522 TST MHRCNT ‘CHECK FOR ANY HARD ER RRORS 

2766 033452 001412 BEQ ENDPS <IF NONE GO TO END OF PASS 

3768 sREPORT ANY MODEM ERRORS HERE 

5770 033454 005237 006506 MCREP: INC ERRCNT ;BUMP ERROR COUNT 

5771 033460 ERRSOFT 4,MSCMS,ERR4 

ae 033460 104457 TRAP CSERSOFT 

5 033462 eWORD 4 

5774 033464 014756 -WORD MSCMS 

5775 033466 01760. eWORD ERR4 

776 033470 005037 011520 CLR MGLCNT sCLEAR GLITCH COUNT 

Ads 033474 005037 011522 CLR MHRCNT SCLEAR THE HARD COUNT 


M11 


SEQ 142 
CVCLHC DPV-11 DATA COMM. LINK TEST MACY11 30A(1052) 23-MAR=82 16:43 PAGE 143 
CVCLHC.P11 22=MAR=-82 11:09 ERNAL END OF PASS CODE 
5779 .SBTTL INTERNAL END OF PASS CODE 
5780 
5781 
578 3+ 
578 : FUNCTIONAL DESCRIPTION: 
5784 ; THIS CODE INCREMENTS THE PASS COUNT FOR THE 
5785 : EVENT LOG, LOGS THE END OF PASS EV VENT 
5786 : IF "RPASS' IS A MINUS ONE RET MODE 
5787 : DISPATCHER. IF NOT ~1 THEN DECREMENT RPASS 
ores Fy AND IF F 'RPASS’ 1S THEN = TO 0 GO TO DCLT PROMT 
378) 3 IN NOT = TO 0 THEN GO BACK’ TO MODE DISPATCHER 
2791 t SUBORDINATE ROUTINES USED: 
5798 3 *LOGEOP’’ = LOG END OF PASS TO EVENT LOG 
5795 : 
2738 033500 005237 006504 ENDPS: INC PSCNT ;BUMP PASS COUNT 
5798 033504 013737 006502 006544 MOV OPVAR, TEMP 
5799 033512 013737 006504 006540 MOV PSCNT ae 
5800 033520 013737 006506 006542 MOV ERRCNT, TEMPS 
3801 033526 004737 020316 JSR PC,LOGEOP :LOG END OF PASS 
5803 053378 022737 177777 006576 CMP #-1,RPASS sSEE IF RPASS==1 
5804 03354 901403 BEQ 1$ sIF IT IS DON'T DECRMNT, LOOP FOREVER 
5805 033542 005337 006576 DEC RPASS [DEC PASS COUNT 
033546 idee 4 BEQ 2$ sIF DONE EXIT TEST 
5807 033550 000137 032140 1$: JMP GTRX2 EL LSE GO BACK a DISPATCH 
5808 033554 042777 000120 155670 2$: BIC #RINTEN!RXENA, @RXCSR TURN OFF RX , 
2809 033562 000137 026642 JMP GTRAS WHEN RPASS=0 24 BACK TO "DCLT> 


N11 


SEQ 143 
CVCLHC DPV=11 DATA COMM. L NK TEST MACY11 30A(1052) 23-MAR=82 16:43 PAGE 144 
CVCLHC.P11  22=MAR-82 11: OWN=LINE=LOAD SECTION 

5811 »SBTTL DOWN-LINE=LOAD SECTION 

aa ¥ FUNCTIONAL DESCRIPTION: 

5814 : OWN LINE LOAD IS NOT SUPPORTED BY THIS DEVICE.. 

5815 : IF THIS MODE IS eALLED BY THE COMMAND LINE INTERPRETER 

5816 : THEN A MESSAGE WILL BE PRINTED ....THAT SAYS DOWN LINE 

2817 : LOAD IS NOT!! SUPPORTED BY THIS DEVICE. 

5819 . 

5 

5 

$822 033566 DLL: 

582% 033566 PRINTF #DLLCM 

5824 073566 012746 014122 MOV #DLLCM, (SP) 
5825 033206 012746 000001 MOV #1,-(SP) 
ais) Ghsany 000? Blea 
5828 reed 062706 00000 ADD #4,SP 


4 
ane) 033606 000137 026642 JMP GTRAS 
5 


CVCLHC_DPV-11_ DATA Com it NK TEST 
CVCLHC.P11 22-MAR-82 1 


5851 033612 042737 000002 006574 
3620 012702 002520 
722 «177777 
002642 


Ss 
5867 05 ce 000377 002520 


1 
5885 033/88 a5 be0702 


B 12 


MACY11 eg 23-MAR-82 16:43 PAGE 145 
ALK MODE SECTION 


-SBTTL TALK MODE SECTION 


“FUNCTIONAL bee eer Tron 
IN N-THIS MODE, THE ‘‘TALK'* END OF THE LINK TRANSMITS OPERATOR 
SPECIFIED MESSAGES UNTIL A ‘EXIT’ MESSAGE IS TYPE. AT THAT POINT, 
THIS END OF THE LINK GOES INTO “LISTEN’’ MODE. 
SUBORDINATE ROUTINES USED: 
*“*LOGTXQ"* = LOG TX SUFFER QUED TO EVENT LOG 
*DVTXRX'' = QUE TX BUFFER TO DEVICE AND WAIT FOR COMPLETE 
"LOGTXC’* = LOG TX COMPLETE TO EVENT LOG 


eS SEQUENCE: 


MODE (R2) sDISPATCH TO MODE BASED ON MODE TYPE IN R2 
TALCK: 
BIC MDATCKB,PARAM ;SET NOCHECK 
MOV #OPBUF ,R 
1$: MOV #~1, (R2)+ :CLEAR OUT OPBUFFER FIRST 
CMP #OPEND .R2 
GMANID OPRMM,OPBUFA,-1,1,72..NO 3GET TALK MESSAGE 
TRAP  C$GMAN 
BR 10001$ 
.WORD  OPBUF 
"WORD  TSCODE 
WORD 
“WORD =1 
“WORD TSLOLIM 
“WORD TSHILIM 
10001$: 
CLR R2 :NOW GET CHAR COUNT 
2$: CMPB «#377, OPBUF (R2) 
BEO 33 
INC R2 
BR 2$ 
3$: MOV R2,0PCNT 
MOV WOPBUF DVTXA =: SET UP TX ADDR. 
MOV 2 
MOV OPCNT, TEMP3 
mov OPCNT Tbvice :SET UP TX CC 
BIS DO TKGFETX.FLAG 7SET UP FLAGS 
CLR CPTRR [CLEAR RX POINTER 
z:THIS CODE ADDED FOR PROTOCOL 
BIT #PROTOB.PARAM ;:°/PROTOCOL' ? 
BEQ $ 
BIC #RXO FLAG SCLEAR RX BIT 
CALL ROTOCOL D0 DOCH BE ANSMIT 


BR os BRANCH 


SEQ 144 
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CVCLHC_DPV-11_DATA COMM. LINK 
TALK MODE SECTION 


Sooooooooooeo 
SESEESE RG 


¥ 
o 
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SEQ 145 






PC ,DVTXRX 
DVTXA, TEMP 

DVTCC, TEMP 

PC, LOGTXC 

#€X, OPBUF :CHECK FOR EXIT 
TALCK 

#'TT,OPBUF +2 


TALCK 

MOTX+HETX,FLAG ;CLEAR THE TX BITS 

#LIS MODTYP :CHANGE TO LISTEN MODE 
TRxS tAND GO BACK TO DISPATCH 
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CVCLHC_DPV-11_ DATA COMM. LINK TEST MACY11 30A(1052) 23-MAR-82 16:43 PAGE 147 
CVCLHC.P11 22-MAR-82 11:09 LISTEN MODE SECTION 


-SBT«L LISTEN MODE SECTION 


SEQ 146 


+ 
FUNCTIONAL DESCRIPTION: 
LISTEN MODE SECTION 
IN THIS MODE LISTEN" END OF THE LINK PRINTS ALL OF THE MESSAGES 
RECEIVED BY vattbestts ON THE OPERATOR'S CONSOLE. IF THE MESSAGE 
RECEIVED IS AN EXIT” MESSAGE, THEN THE NODE ENTERS ‘‘TALK'’ MODE. 
SUBORDINATE ROUTINES USED: 


*“DVRXQ"* = QUE RECEIVE ah SPACE TO DEVICE 
Rcuee TO EVENT LOG 


CALLING SEQUENCE: 
JMP @MODE (R2) zDISPATCH TO MODE BASED ON MODE TYPE IN R2 


Be Se Se Ge Ge Ge Ge Ve Se Ge Ge Se Se Fe Se Se Se 


LISCK: BIC #DATCKB, PARAM :CLEAR CHECK BIT 
PRINTF #LISP *PRINT PROMPT FOR OPR. 
#LISP,-(SP) 
#1,-(SP) 
SP.RO 
CSPNTF 
LISCKA: mov #OPBUF ,DVRXA —- ; SET DEVICE UP TO REC AT OPBUF ‘ 
MOV DURE :SET UP CHAR COUNT TO 82. 


MOV 
BIS M#ORX+HE 3SET UP_FLAG 
CLR CPTR SCLEAR THE TX. 


33 WAS PROTOCOL SELECTED ? 
BIT #PROTOB ,PAR 3°/PROTOCOL® ? 
2 ; YES BRANCH 


013 
52 


51 PC .DVRXQ sQUE RX 
2 


PC. LOGRXQ 

pC DVTXRX 360 TO DEVICE RX. SUBROUTINE 
258 :SKIP PROTOCOL 

*GO DDCMP PROTOCOL 


3SET UP ADDR.AND CC. 
3LOG COMPLETED 


fi. nSP =(SP) 


sP§ 
cSéuTF 


#°EX, OPBUF 
LISCKA 





} 
3 





E 12 
SEQ 147 

CVCLHC DPV-11 DATA COMM it NK TEST MACY11 30A(1052) 23-MAR=82 16:43 PAGE 148 
CVCLHC.P11 2DAMARSB? LISTEN MODE SECTION 

e 8888 7 052111 002522 CMP #IT,OPBUF+2 IF FIRST HALF OK CHECK NEXT PART 

BNE LISCKA TIF NOT EXIT THE GO BA 
5987 O34 O18 000005 006566 MOV ATAL ,MODTYP SCHANGE MODE TO TALK 
rt 032140 JMP GTRX2 SRETURN TO DISPATCHER 


F 12 


SEQ 148 
CVCLHC DPv-11,, ATA, COMM, it NK TEST MACY11 30A(1052) 23-MAR-82 16: 43. PAGE 149 
CVCLHC.P11 DEVICE FUNCTION SUBROUTINE 
5961 .SBTTL DEVICE FUNCTION SUBROUTINES 
396 
ss 
3364 .SBTTL DEVICE INIT SUBROUTINE 
596 
5968 
5969 3¢ 
5970 : FUNCTIONAL DESCRIPTION: 
5971 : DVINIT= DEVICE INIT ROUTINE 
597 : THIS ROUTINE IS DEV Ice DEPENDENT CODE THAT INITS 
59 : THE DEV ICE BEING TEST 
5974 : IT SETS THE DEVICE UP TO THE MODE IT IS TO RUN I 
5975 : INITIATES THE START,STACK,ACK SEQUENCE IF THE “ANODE” (REMOTE 
298 ; NODE) INPUT INDICATES THE REMOTE NODE IS NON-ITEP 
5978 : INPUTS: “FHDPLX" INDICATES IF MODE IS FULL OR HALF DUPLEX. (1=FULL) 
2979 : ADDRESS POINTERS (SELO,...) ALREADY POINT TO DEVICE'S REG.S 
5981 : "MLTYP' INDICATES THE LOOP TYPE (1=TTL,2=CAB,3=RM,4=LM) 
2982 3 “RNODE’’ INDICATES THE TYPE OF REMOTE NODE (ITEP=1,NON-ITEP=0) 
3984 : SUBORDINATE ROUTINES USED: 
5986 : “CTSSR'’ = CLEAR TO SEND SUB ROUTINE 
5987 : ') N31". = SEND CONTROL AND REC OR TIME OUT 
5988 ; “CLRRTS'® = CLEAR REQUEST TO SEND ROUTINE 
3989 ; Ove" - LOG DEVICE ERROR TO EVENT LOG 
5991 + CALLING SEQUENCE: 
2998 ; JSR PC,DVINIT 
299 = 
99% 
5995 034304 DVINIT: 
2996 ZMASTER CLEAR DEVICE 
9998 034304 012777 000001 155146 MOV WRESET,@TXCSR  ;DO A MASTER CLEAR 
6000 034312 105777 155134 TSTB © @RXCSR :SEE IF IT WORKED 
6001 034316 001423 BEQ DVINI [BRANCH IF OK 
034 BREAK 
600s 0 104422 TRAP  C$BRK 
6005 ;REPORT ERROR IF RESET 
6006 [DOES NOT WORK 
600 
6008 12 7 016747 540 MOV #DVEMO, TEMP 
17737 15511 348 MOV @RXCSR. TEMP 
6010 17737 15511 54 MOV aTXCSR.TE ;LOAD_UP_ERRM. AND REG OUTPUTS 
6011 7 0201 JSR PC,LGDVE [LOG TIME OUT WAITING FOR RUN 
6012 50 005237 5 INC E CN 
601 54 ERRSOFT 5,DVEMO,ERR13 
6014 54 sobtps TRAP SERSOFT 
6016 16747 WORD DVEMO 
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SEQ 149 
CVCLHC eet A ATA ¢ oe TEST MACY11 30A(1052) 23-MAR-82 16:43 PAGE 150 


CVCLHC.P11 DEVICE INIT SUBROUTINE 
6017 362 017634 -WORD _ERR13 
reid $3360 80077 BR DVINIT 360 BACK AND TRY MSTR CLR AGAIN IF ERROR 


3SET TTL LOOP IF REQU'D 


1 
4 366 04 000003 DVIN1: BIC #3, FLAG 3CLEAR INPUT AND OUTPUT INT FLAGS 
4 10 1 36 BIC #TTLL,@TXCSR CLEAR INTERNAL LOOP 
4 02 0 g 1 00657 CMP arT L,MLTYP z1$ TTL SELECTE 
5 1 BNE : IF NOT GO TO 
03441 000010 155040 BIS att TIL, @TXCSR ELSE SET INTERNAL LOOP 


60 Otte ~ 000002 006570 DVIN3: CMP semen 
6050 0 001451 BE dvVI 31F CABLE LOOP SKIP CHECK 





60 1 [FOR MODEM READY 

oa 0 432 020737 000004 006566 CMP #D0W, MODTYP :CHECK IF DLL 

60 S3cce 1 _ BNE DVINSA BRANCH fF NOT DLL 

60 5 034442 000137 035102 JMP DVINEX SELSE EXIT 

6037 034446 012777 000002 154776 DVIN3A: MOV #DTR,@RXCSR :SET UP DTR. 

6039 034454 012737 2000 006640 MOV #2000, TIMER 

6040 034462 737 iteet DVIN38: TST TIMER' 

6041 034466 001022 BNE DVIN39 :1F TIMER NOT OUT GO TO 39 

604 ;SET ERROR FOR NO MODEM READY 

$04 743 034470 012737 017375 006540 MOV #DVEM6, TEMP 

6046 7% 017737 154750 542 MOV @RXCSR. TEMP 

6047 034506 017737 154750 544 MOV a@TXCSR., TEMPS 

6048 512 7 920160 J PC, LGDVE 

6049 516 005237 0065 INC F CNT 

6050 5 ERRSOFT 11,DVEM6,ERR13 

6051 522 104457 TRAP  CSERSOFT 

6052 524 13 .WORD 11 

605 5 1737 “WORD OVE 

6054 & 17636 “WORD ERR 

6055 5 45 BR DVIN3A ;THEN TRY TO SET DTR AGAIN 

6096 5 DVIN39: BREAK 

605 534 1044 4 TRAP  CSBRK 
5 17 154710 11476 MOV anx¢ IRXCSR ;GET COPY OR RXCSR 

re 5a 3 S757 001 11476 BIT IRXCSR 1S MODEM READY SET 

rin 58 33¢ ee 11472 154672 DVIN37: MOV pun ,@PCSAR =; SET_UP_ PC 

ores 566 a1e5 — ane OVGNEX i eta: — 

6064 370 3 006572 ist PHDPL is THIS FULL DUPLEX 
57 7 000040 006574 BIT #PROTOB, PARAM sencorocon® 2 

oe? 11 BNE DVINEX *YES.EXIT 

6069 s:THIS START=STACK ROUTINE USED IN NON PROTOCOL.NON ITEP,FULL DUPLEX MODE 

Sort 112737 5 002645 hove =~ } joel :SET UP ENO 

Boe ote ere oobeO 006600 Boye PRUNITXALFLAG —2SET FLAG WORD 
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MACY11 30A(1052)_ 23-MAR-82 16:43. PAGE 151 


DVING1: 


DVING: 


DVINY: 


DIVN91: 


DVINS8: 


DVIN81: 


DVINEX: 


DEVICE INIT SUBROUTINE 
MOV £00 “eter 3SET TIMER FOR 1 MINUTE 


JSR SSR :SET CTS IF NESC. 
MOV DMC [SET UP STAT CODE 
Sk Pc OVIN 1 [G0 TX STRT AND CHK FOR RX. 
BEQ bVINH zIF TIMER EXPIERED EXIT 
CMP #6, PHDMCC z1S THE RCVD=STRT 
BEQ DVINS SIF $O GO TO ASTRT 
CMP #7,,RHDMCC TIS IT A STACK 
DVING1 tIF NOT STACK ETIHER GO BACK 


SR PC, CTSSR :SET REQUEST TO SEND 
BIC #OTX! PAD, FLAG 3 CLEAR TX COMPT FLAG. 
MOV cc SET UP ACK 

MOV @HOMSG*1.MSGPTR 2SET UP POINTER 


MOV HDMC ,MSGCC 

MOV #8.,SYNCC sSET UP SYNC COUNT 

BIS A TXENA' TINTEN, arxcsR 
#OTX, FLA 


BIT 

BNE DVINEX sEXIT IF ACK SENT 

BREAK 
TRAP 

TST TIMERS 

BNE DIVN91 zIF NOT TIMER EXPIRED RECHK TX. 

BR DVINS1 SIF TIMER OUT REPORT IT 

mov #7,,HDMC sSET POTINTER TO STACK 

JSR PC. DVIN31 SAND GO SEND STACK 

TST TIMERS 

BEQ DVINS1 sREPORT ERROR IF TIME OUT 

CMP #1,RHDMCC t1S IT ACK RCVD? 

BEQ INEX SIF SO EXIT 

CMP #7,RHDMCC t1S IT STACK RCVD 

BEQ DVINO SIF SO SEND ACK 

BR DVINS SIF NEITHER SEND ANOTHER ACK 

3D0 ERROR AND REPEAT 

MOV #DVENS, TEMP 

MOV RHDMCC 

MOV HDMCC funn :LOAD UP ERRM. AND REG OUTPUTS 

ISR PC LGbvE [LOG TIME OUT WAITING FOR RUN 

ERRSOFT FR OVENS ERR13 
TRAP 
WORD 
“WORD 


INC OPVAR 3 COUNT HOW MANY TIMES WE DO THIS. 
JMP DVINIT STRY ALL OVER AGAIN 

JSR Pp :CLEAR RTS IF NESC 

BIC Ale FLAG [CLEAR FLAG WORD 

BIS iSET THE INITT OVER FLAG 

RTS SRETURN TO CALLER 


CSBRK 


Spenser? 


Byers 


SEQ 150 
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CVCLHC_DPV-11_ DATA COMM. LINK TEST MACY11 30A(1052) 23-MAR-82 16:43 PAGE 152 
CVCLHC.P11 22-MAR-82 11: DEVICE INIT SUBROUTINE 


61 
61 


SEQ 151 


J 12 


SEQ 152 
CVCLHC DPV-11 DATA. COM 5 tink TEST MACY11 30A(1052) | 23-MAR=82 16:43 PAGE 153 
CVCLHC.P11 2 DEVICE GET MODEM STATUS SUBROUTINE 
ere .SBTTL DEVICE GET MODEM STATUS SUBROUTINE 
613 
61 
eis 3+ 
61 : FUNCTIONAL DESCRIPTION: 
6137 : "DVMODS'’ GET MODEM STATUS 
6139 : IMPLICIT INPUTS: 
6140 : THE BIT POSITION AND AVAILABILITY OF THE MODEM SIGNALS CTS.DSR,...RI.. 
14] : FOUND IN THE DEPENDENT PORTION OF THE GLOBAL EQUATES SECTION. 
614 : OUTPUTS: 
6146 ; CURRENT MODEM SIGNAL VALUES IN ‘MODS"’ 
6146 ; 
6147 + CALLING SEQUENCE: 
6148 : JSR PC ,DVMODS 
oreo <a 
6151 035124 017737 154322 007554 DVMODS: MOV @RXCSR,MODS 
6152 0351 2 042737 000040 007554 BIC #B1T5, :CLEAR BIT 5 
6153 035140 032777 000040 154312 BIT #BITS.aTXCSR :SEE IT TM OR SQ SET 
6154 035146 001403 BEQ SIF NOT EXIT 
6155 035150 052737 000040 007554 BIS welts MODS TIF SET SET BIT 5 
6156 035156 042737 106720 007554 DVMEX: BIC #106720,M0DS § ;:CLEAR ALL UNUSED BITS 
6157 035164 000207 RTS PC SRETURN TO CALLER 


K 12 


SEQ 153 
CVCLHC DPV-11_ DATA COMM. LINK TEST MACY11 30A(1052) 23-MAR=82 16:43 PAGE 154 


CVCLHC.P11  22=MAR-82 11: DEVICE QUEUE RECEIVE SPACE SUBROUTINE ; 
6160 .SBTTL DEVICE QUEUE RECEIVE SPACE SUBROUTINE 
o16¢ 3+ 
616 : FUNCTIONAL DESCRIPTION: 

6164 : DVR THIS SUBROUTINE QUEUES THE RECIEVER BUFFER SPACE TO THE 
6165 ; DEVICE, THEN CLEARS THE QRX BIT OF THE FLAG WORD. 
6167 : INPUTS: 

6168 : DVRXA = ADDRESS OF RX BUFFER SPACE 

6169 : DVRCC = BYTE CHAR COUNT OF RX BUFFER 

6170 ; QRX FLAG BIT = SET BY CALLING ROUTINE 

617 : OUTPUTS: 

61 ? ; ; QRX FLAG BIT = CLEARED BY ROUTINE 

6175 t CALLING SEQUENCE: 

6176 : JSR PC ,DVRXQ 

61 :-- 

6178 

6179 

6180 035166 DVRXQ: 

6181 035166 032737 000004 006600 BIT WORX, FLAG 

618¢ 035174 001434 BEQ DVREX z1F NOT RX. THEN EXIT 

6184 035176 042737 000444 006600 BIC #ORX+4BCC+4RXM, FLAG SCLEAR FLAG FOR RX 

6185 035204 005737 011524 TST RNOD :IF NON ITEP GO TO 2 

6186 035210 001415 BEQ DVRX 

6187 033218 05¢7 ? 40 006600 BIS #RXM+4BCC FLAG :GET JUST THE DATA NO CRC. 
6188 035 013737 70 011512 MOV DVRXA,RMSGPT 

6189 035226 012737 72 011514 MOV #72,RASGCC :SET UP RX TO GET ITEP MSG. 
6190 035234 012737 70 72 MOV #7 0, puree 

6191 035242 000406 DV 

oie sENABLE RX, RX INTERRUPTS,AND DATA SET INTERRUPTS 

6195 03524 012737 002657 011512 DVRX2: OV #RHDMSG*1 RMSGPT 3SET UP POINTER 

6196 035 53 013737 002654 011514 MOV RMSGCC 

6197 035260 052777 000160 154164 DVAX3: BIS SR INTEN RXENA! ADSITEN, arkcsR 

6198 035266 900207 DVREX: PTS PC ;RETURN TO CALLER 
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CVCLHC_DPV-11_ DATA con st NK TEST MACY11 30A(1052) 23-MAR-82 16:43 PAGE 155 
CVCLHC.P11 22-MAR-82 DEVICE TRANSMIT AND RECEIVE SUBROUTINE 


-SBTTL DEVICE TRANSMIT AND RECEIVE SUBROUTINE 





FUNCTIONAL DESCRIPTION: 
DVTXRX=DEVICE TRANSMIT AND RECEIVE ROUTINE 
THIS CODE QUES THE TRANSMIT BUFFER TO THE DEVICE 
IF NEEDED. THE CODE THEN WAITS FOR A TX COMPLE, 
t TE OR BO CODE R I 


ERR F NO OUTPUT INTE 
60 SECONDS. AFTER REPORTING ERROR TIMER IS RE_ STARTED 
AND DEVICE WILL CONTINUE TO WAIT FOR INTERRUPT. 


INPUTS: 
"DVTXA"" = ADDRESS OF TRANSMIT MSG. 
. DVTCC’ = BYTE COUNT OF TRANSMIT MSG. 
e ee IT ” SE 
"ETX'' BIT = SET 
‘ERX’’ BIT = SET 


OUTPUTS: 
VTXA** = ADDRESS OF TX MSG. COMPLETED 
*DVTCC’* = BYTE COUNT OF TX_MSG. COMPLETED 
TX = SET IF ETED 


SE OMPL 
*DVRXA’’ = ADDRESS OF RX MSG. COMPLETED 
"DVRCC’* = BYTE COUNT OF RX MSG. COMPLETED 
“QRX"’ = SET IF RX COMPLETED 


VBIVBVUVGLUGUowwrvworw & 
BR CER TERRES SEER RRR E SES SS 


< 
o 


SUBORDINATE ROUTINES USED: 
"LGDVE’’ = LOG DEVICE ERROR TO EVENT LOG 


REGUL 
PITTS 2SSaN 


CALLING SEQUENCE: 
JSR PC ,DVTXRX 
035270 032737 000010 006600 DVTXRX: BIT #OTX, FLAG sANY TX TO QUE 
035276 001444 BEQ DVT :IF NOT GO WAIT FOR OUPUT 
035 0427 7 091030 006600 BIC #OTX+ATXM+PAD FLAG [CLEAR FLA 
40 035506 7 03657 JSR PC,CTSSR :60 SET CTS 
41 035312 005737 011524 TST RNODE 
SS BiH5 FEAF oon onegso = Bika HMM eee BL 
035 6 eras 0064 4 O11 02 MOV SV IKK. Le orR 
45 035 13737 56 0115 MOV DVTCc .MSGCC iat SET UP FOR ACTUAL DATA 
46 035342 000414 BR DV 
4 sENABLE TX AND TX INTER. 
49 035344 112737 200201 002645 DVTR1: MOVB #201,HDMSG+1 :SET UP SOH 
20 35350 1 , , 2645 11308 mov #HDMSG* |. ,ASGPTR :SET POINTER TO HEADER 
5 35366 13737 634 oa68 MOV HDAC -ASGCC :SET CC FOR HEAD 
5 5374 012737 1 1 DVTR2: MOV #177, SYNCC SSET UP FOR 177 SYNCS. 
35402 052777 120 0 BIS #TXENA!#TINTEN, @TXCSR 


CVCLHC DPV-11 
CVCLHC.P11 


a 


8 
[>] 


ae 


RBRERL 
RUN SOo 


see 


6275 


88 
6289 
6290 


6291 
6293 
629 


035410 


466 
035470 


77? 035472 
035500 


035502 
035506 
035514 
035516 
035524 


035526 
035534 


035536 
035544 


035546 
035552 
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012737 


8 008789 
001022 


012737 
017737 
017737 
004737 


000074 


NK TEST 


006644 


006348 
00654 
006544 


006600 
006600 
006600 
006600 


006600 
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MACY11 30A(1052) 23=MAR=82 16:43 PAGE 156 


DEVICE TRANSMIT AND RECEIVE SUBROUTINE 


DVTR3: MOV #60. , TIMERS :SET TIMER FOR 60 SECS 
DVTR8: BREAK 
TRAP 
TST TIMERS s1S TIMER EXPIRED 
BNE TOINOT 
sLOG ERROR TIME OUT RX OR TX NOT COMPLETED 
MOV #DVEM2, TEMP 
MOV @RXCSR, TEMP 
V @TXCSR, TEMPS 
JSR PC, LGDVE 
INC ER CNT 
ERRSOFT 7,DVEM2,ERR13 
TRAP 
. WORD 
WORD 
WORD 
BR DVTR3 ;RETURN TO CHECK TIMER 
TOINOT: BIT #OTX.FLAG z1S IT TX COMPL? 
BEQ DVTR& SBRANCH IF TX NOT DONE. 
JSR PC,CLRRTS 
BIT #ERX. FLAG zARE WE EXPECTING TO RX 
BEQ DVTREX [BRANCH IF NOT. 
DVTR4: BIT WORX, FLAG :1S RX DONE 
BEQ DVTRE *GO BACK AND TIME IF NOT 
BIT #ETX, FLAG sARE WE EXPECTG TO TX. 
BEQ DVTREX SBRANCH IF NOT. 
BIT #OQTX. FLAG 31S IT 1X COMPLETED 
BEQ DV Ke TIME OU 
JSR PC, CLRRTS <CLEAR RTS IF NESC. 
DVTREX: RTS PC SAND EXIT 


C$BRK 


CSERSOFT 
4 


ERRIS 





SEQ 155 


N 12 


CVCLHC DPV-11 DATA om it NK TEST MACY11 30A(1052) 23=MAR-82 16:43 PAGE 157 
CVCLHC.P11 22-MAR=82 11:09 DEVICE TRANSMIT AND RECEIVE SUBROUTINE 


; DEVICE DEPENDENT SUBROUTINES 


SEQ 156 


5 
7 
.SBTTL DEVICE INTERRUPT SERVICE ROUTINES 
$303 
etd 3¢ 
6304 : FUNCTIONAL DESCRIPTION: 
5 : RECEIVER INTERRUPT ROUTINE. WHEN A RX INT. OCCURS 
6306 : THIS ROUTINE DECIDES IF IT IS A RX STATUS,DATA SET 
6307 : C OR DATA INTERRUPT. IF IT IS A DATA SET CHANGE 
6308 : INTERRUPT IT PUTS THE STATUS IN "‘CMODS': 
6309 : THAT STATUS TO THE OLD STATUS IN ‘MODS’. IF THEY ARE 
6310 : THE SAME THAT MEANS THE INTERRUPT WAS CAUSED BY A GLITCH 
6311 : ON ONE OF THE LINES. IF THEY ARE DIFFERENT THEN A HARD 
631¢ F MODEM ERROR ots 2 OCCURED. IN ANY EVENT THE MODEM STATUS 
6314 : IF A DATA INT. OCCURS THE ROUTINE, PUTS THE DATA AWAY 
6315 : IN A BUFFER POINTED TO BY ‘RMSGPT’’ THE MSG. COUNT IS 
6316 : DECREMENTED BY ONE BYTE. IF COUNT IS EQUAL TO ZERO AND 
6317 : "BCC" BIT AND "RXM'' BIT IS SET THEN RX RX JS DISABLED AND 
6318 : ‘ORK’: BIT IS SET. IF COUNT IS ZERO BCC’ BIT IS SET 
6319 : BUT “RXM' BIT IS NOT SET THEN MSG COUNT IS SET TO LENGHT 
6320 : RECVD_IN HEADER AND "RMSGPT" IS SET TO RX BUFFER LOCATION 
6321 : AND 'RXM' BIT 
6322 : IF COUNT IS EQUAL TO. TO ZERO AND ‘BCC’' IS NOT SET THEN 
632 : COUNT IS SET TO RMSGPT’’ IS SET TO 'BCCW’* AND 
6524 : BCC’’ BIT IS SET. 
6326 : IF A STATUS INTERRUPT OCCURS THEN OVERRUN ERROR BIT IS CHECKED. 
6527 : AN ERROR IS LOGGED AND "ORX’’ IS SET AND THE RX IS DISABLED. 
i | nour 
3 RMSGPT = ADDRESS OF RX BUFFER 
63 1 : RMSCC = COUNT OF DATA TO BE RXED. 
633 ; SUBORDINATE ROUTINES USED: 
3 “LOGMSC LOG MODEM STATUS CHANGE 
6335 ; ‘LGDVE - = the DEVICE ERROR 
BGNSRV DVRXI 
5 4 MOV R2,~(SP) : SAV —— 
1 $ $ 153670 011476 MOV @RXCSR,IRXCSR :MOV RX CSR TO IMA 
7 1 574 BIT #MOCHK{PARAM ANY MODEM CHANGES TO REPORT 
BEQ RXINZ1 TIF NOT IGNORE DS CHANGE. 
002000 006600 BIT #INOVR FLAG 1S INIT OVER 
5 BEQ RXINZ1 [NO THEN IGNORE DS CHANGE. 
011476 TST IRX-SR 
BPL XI sIF DATA SET CHANGE IS NOT SET BR 
Z Otte 476 guia? MOV CMODS § :MOV THE NEW MODEM STATUS IN 
BIC Hah CMODS 





CVCLHC DPV-11 DATA ¢ LINK 

CVCLHC.P11 2 AAR CBe 11509 

6350 035626 03 000040 

6351 0356. 7 3 

6352 0356 7 0 

6353 035644 013737 011476 

6354 035692 013737 007554 

6355 035 025757 006544 

6356 035 14 

6357 035670 005 011522 

6358 035674 012737 01671 

6359 035702 05 

6360 33706 005257 911520 

6361 035710 012737 016671 

6362 03571 737 020334 

6363 035722 013737 011474 

6364 

6365 

6366 

6367 035730 032737 002200 

6368 035736 001544 

6369 035740 017737 153512 

6370 035746 032737 200 

6371 035754 001455 

6372 

6373 

6374 

6375 035756 013702 011512 

6376 035762 113722 011500 

6377 035766 010237 011512 

6378 

6379 

6380 035772 005337 011514 

6381 035776 001124 

6382 036000 032737 000400 

6383 0 001066 

6364 036010 032737 100000 
036016 0010 

rat) 389 036020 903935 011500 

6388 036026 013737 01147 

6389 036034 012737 01720 

6390 036042 004737 020160 

6391 0 005237 006506 

6392 03605 

6393 036052 104457 

6394 036054 000010 

6395 036056 ot 7208 

6396 036060 017 

6398 036062 000467 

rates 036064 052737 0004 

cant Ssenre Bigrar Souahe 

6403 036106 

6404 

6405 


TEST 


153624 


006540 
007554 


011476 


011500 
011476 
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MACY11 30A(1052) 23-MAR-82 16:43 PAGE 158 


RXIN2: 


GLINC: 
RXIN1: 


RXIN21: 


RXING: 


RXIN6: 


DEVICE INTERRUPT 

#TM.QTXCSR 

RXIN 

B #7, CMODS 

MOV CMODS,, TEMP3 

MO MODS, TEMPS 

CMP TEMPS , TEMP3 
GLINC 


SERVICE ROUTINES 


sIF TEST MODE SET 


sSET IT IN NEW STATUS 


sCOMPARE OLD TO CURRENT 
3 INC GLITCH COUNT 


HARD COUN 
:SET UP HARD MESG. 


2 INC a COUNT 


LITCH 
G0 LOG MODEM STATUS CHANGE 
MOVE CURRENT TO OLD 


31F NEITHER EXIT 


INC MHRCNT 

MOV #HRDMSG, TEMP2 

BR RXIN1 

INC MGLCNT 

MOV #GLMSG,TEMP2  :SET UP 
JSR PC, LOGMSC 

MOV CMODS ,MODS 

STEST FOR STATUS OR DATA 

BIT #RSTARY !RDATRY, IRXCSR 
BEQ RXINEX 

MOV @RDSR, IRDSR 

BIT SRDATAY  IRXCSR 

BEQ RXIN3 


3GET HERE WITH GOOD DATA 
MOV RMSGPT ,R2 

MOVB IRDSR, (R2)+ 

MOV R2,RMSGPT 


DEC 

BNE RXINEX 

BIT #BCC FLAG 
BNE RXIN 

BIT #RERR, IRDSR 
BNE RXING 

MOV IRDSR, TEMP3 
MOV IRXCSR, TEMPS 
MOV #DVEM3, TEMP2 
JSR LGDVE 


N 
ERRSOFT B DVERS ,ERR13 


BR RXINB 

BIS FLAG 
MOV CC eter 

MOV matt SRSGPT 
BR RXI 


sSTATUS CHECK 


31S THIS DATA 
IF NOT GO TO 3 


sSTORE DATA AWAY 
PUT POINTER BACK 


GET OUT _IF NOT ALL DONE 
31S THE BCC FLAG ALREADY SE 


CH IF YES. 
“1S THE ERR CHK BIT SET INDICATING 


:G00D BCC. 
sBRANCH IF GOO 


DISABLE INTERRUPTS AND EXIT 


3SET FLAG 
3SET THE COUNT TO 2 
3SET POINTER TO BCC WORD 


sreneery 


DVEMS 
ERR15 


SEQ 157 


CVCLHC_DPV-11 DATA COMM. LINK 
CVCLHC.P11 22-MAR~82 11: 

6406 
6407 036110 032737 002000 
6408 036116 001454 
6409 
6410 
eti2 036120 012737 017245 
et15 Ose t2¢ O1737 $1450 
6414 0361 013737 Bien ONG 
6415 036142 004737 020160 
16 Ole 005237 006506 
6417 03615 
6418 036152 104457 
6419 036154 000011 
6420 036156 017245 
6427 036160 017634 
Shs 036162 000424 
6424 036164 Ose or 000040 
6425 036172 001020 
6426 036174 052737 000040 
6427 036202 042737 000400 
6428 036210 01 ate 006470 
ep 036216 013737 002660 
6430 036224 013737 002660 
rh 036232 06 
eas 036234 052737 000004 
yah 4 036242 042777 000120 
6437 036250 012602 
6438 036252 
6439 036252 

0 036252 000002 


TEST 


011476 


Oo¢34e 
Oneee 


006600 
006600 
0066 


oo 

—— 

—— 
yo 
NES 


4 


006600 
153202 
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SEQ 158 


MACY11 30A(1052) 23-MAR=82 16:43 PAGE 159 
DEVICE INTERRUPT SERVICE ROUTINES 


RXIN3: BIT WRSTARY,IRXCSR :1S THIS A STATUS INT. 
BEQ RXINEX SEXIT IF NOT 
3LOG OVERRUN ERROR 
MOV #DVENG TEMp2 
MOV R, TEM 
MOV RKee eet aed 
JSR PC tepve 
INC ERACNT 
ERRSOFT ER TEMS ERR13 
TRAP  CSERSOFT 
.WORD 9 
“WORD DVEM4 
“WORD ERR13 
BR RXIN7 
RXINS: BIT #RXM, FLAG :1S THE RX M BODY BIT SET 
BNE RXIN? SIF YES THEN ALL DONE 
BIS #RXM, FLAG 
BIC #BCC.FLAG :CLEAR BCC AND SET RXM 
MOV DVRXA.RMSGPT § : MOVE ADDRESS TO POINTER 
MOV RHDMCC,RMSGCC :MOVE THE CHAR COUN 
MOV RHDMCC,DVRCC :SET THE CC TO AMOUNT IN HEADER 
BR RXINEX : INISH. 
RXIN7: BIS WORX, FLAG :SET FLAG BIT 
RXINS: BIC WRINTEN+RXENA,@RXCSR ss CLEAR _INTAND RX ENABLE 
RXINEX: MOV (SP)+,R2 sRESTORE R2 
ENDSRV 


L10020: 
RT? 
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SEQ 159 

CVCLHC DPV=11 DATA COMM, LINK TEST — MACYI1 3OA(1052), 23-MARA82 16: 43 PAGE 160 
CVCLHC.P11 © 22=MAR~82 1 DEVICE TRANSMIT INTERRUPT ROUTINE 

gait »SBTTL DEVICE TRANSMIT INTERRUPT ROUTINE 

644 

6444 : FUNCTIOKAL DESCRIPTION: 

G443 ; DEVICE TRANSMIT INT. ROUTINE 

6447 WHEN. A TRANSMIT BUFFER EMPTY CAUSES AN INTERRUPT TO OCCUR 

6448 THE PROGRAM COMES TO THIS ROUTI 

6649 IF THE SYNC COUNT'SYNCC™ IS. NON ZERO_TSOM IS SET 

SYNC _CHAR IS LOADED TO TDSR AND THE SYNC COUNT IS 


A 
DECREMENTED. 


IF = SYNC FOUuNT IS ZERO TSOM AND TEOM ARE RESET 
AND THE ‘PAD T_IN FLAG WORD IS CHECKED IF IT IS 
SET THEN A PAD 77) CHAR IS LOADED TO TDSR AND TX 
INTERRUPT ENABLE IS CLEARD. 


IF THE SYNC COUNT IS ZERO AND THE ‘PAD* FLAG IS 
CLEAR THEN A BYTE IS PUT IN TDSR FROM THE ADDRESS 
IN MSGPTR AND THE MSG COUNT IS DECREMENTED 


IF THE MSG COUNT GOES TO ZFRO THE **TXM’’ BIT IS 
a ae IF IT is SET THE 'PAD'’ FLAG IS SET 
IF IT IS CLEAR THEN IT GETS SET AND MSGPTR IS 
1.OAD ad WITH THE ADDRESS OF TXBUFF AND THE MSG 
COUNT IS LOADED WITH THE COUNT OF THE MSG TO 
BE TRANSMITTED. 


INPUTS: 
MSGPTR ~ IS SET TO THE ADDRESS OF THE MSG e. pas TO BE TX*D 
MSGCC = IS SET TO THE COUNT OF MSG TO BE T 

OUTPUTS: 
QTX - THIS BIT IS SET WHEN MSG IS TX*D OK. 


FSS SSS SSSSS 
NRARAGLS 


Mui 
sooo 


SEELEEPEETER CSR EEE ESTEE 


502 MOV R2,MSGPTR RESTORE POINTER 
é MSGCC :DEC CC 


036254 BGNSRV DVTXI 

036254 DVTXI:: 

036254 010246 MOV R2,-(SP) ZSAVE R2 

036056 5737 011506 TST SYNCC SANY SYNCS TO SEND 

0 1406 BEQ TXINI IF TO 1 

0 13 11510 153170 MOV SYNCW, @TDSR TELSE SET TSOM AND SYNC WORD 

5337 011506 DEC SYNCC *DEC SYNC COUN 
7 1060 BNE TXINEX TIF NOT ZERO EXIT 
001400 153154 TXINI: BIC #TEOM! TSOM,@TDSR 
6485 036. 32737 001 006600 BIT #PAD, FLAG 31S THE PAD BIT SET 
6486 36314 001414 BEQ TXINE :60 TO 2 IF NOT SET 
6487 16 012777 377 153136 MOV #377, aTDSR [LOAD FF TO TX DATA REG. 
4 777 100 153126 BIC ATINTEN aTXCSR 3CLEAR TX INT ENABLE 

6489 52737 90001 006600 BIS #OTX, FLAG [SET THE TX COMPLETE IN FLAG 
6490 237 12 INC XRE TELL PROTOCOL MODULE THAT WE ARE DONE 
6491 5 BR TXINEX 3AND 
6498 36 6 1 708 011502 TXIN2: MOV MSGPTR .R2 LOAD R TH TX ADDR. 
6493 03635 12 1531 MOVB = (R2)+,aTDSR {TOAD DAT 
6494 036 10237 01 ép 
6495 7 01 c 
6496 


E 13 


SEQ 160 
CVCLHC DPV-11 DATA. COMM LINK TEST MACY11 30A(1052) 23-MAR-82 16:43 PAGE 161 
CVCLHC.P11  22=MAR-82 11: DEVICE TRANSMIT INTERRUPT ROUTINE 

6497 036370 $2777 901000 153064 BIS #TEOM, @TDSR 

6498 036376 737 20 006600 BIT #TXM, FLAG 31S THIS THE END OF DATA MSG. 

6499 036404 01g BNE TXINS TIF $0. SET THE P 

6500 036406 05 000020 006600 BIS #TXM, FLAG [IF NOT MUST BE END AF HEADER 

6501 036414 013737 006454 011502 MOV DVTXA,MSGPTR  :SO SET UP MSGPTR FOR MSG 

6502 036422 013737 006456 011504 MOV DVTCCMSGCC SAND THE CC FOR MSG. 

6503 0364 90040 BR TXINEX 

6504 036432 052737 001000 006600 TXIN3: BIS #PAD FLAG sSET THE PAD BIT 

6506 036440 012602 TXINEX: MOV (SP)+,R2 sRESTORE R2 

6507 03644 ENDSRV 

6508 03644 L10021: 

509 036442 000002 RTI 


F 13 


SEQ 161 
CVCLHC _DPV-11_ DATA COMM. LINK TEST MACY11 30A(1052) 23-MAR-82 16:43 PAGE 162 
CVCLHC.P11 22-MAR=82 11: DEVICE TRANSMIT CONTROL MSG 
$319 oSBTTL DEVICE TRANSMIT CONTROL MSG 
651 


"FUNCTIONAL D DESCRIPTION: 


651 : OUT INE DOES THE FOLLOWING 

6514 : UES , RX SPACE AT RHDMSG+1 

6515 : QUES A TX MSG mn ROMSes} 

651 ; CHECKS A TIMER EXPIRED 

651 : IF EXPIRED RETURN TO CALL 

6518 ; ELS CK FOR A TX MSG COMPLETED 

6519 : IF TX COMPLETED CHECK FOR RX COMPLETED 

65 : ELSE “RECHECK TIMER AND TX COMPLETED UNTIL 

6521 : EITHER TX COMPLETE OR TI 

65 2 : IF TX COMPLET E AND RX NOT COMPLETE THEN 

65 : REQUE TX MSG. 

$3 4 ; ELSE IF RX COMPLETE RETURN. 

65 6 + INPUTS: 

65 : = SET IN FLAG WORD 

6308 : HDMSG+2 - TYPE OF CONTROL MSG.. 

65 ; SUBORDINATE ROUTINES USED: 

6531 : “CLRRTS' = CLEAR REQUEST TO SEND IF HALF DUP. 
6352 t CALLING SEQUENCE: 

653 : JSR PC,DVIN31 

6534 > RETURN: 

6935 3 RETURN TO CALLER IF SOMETHING RX"D OR TIMER OUT. 
oy a 

6359 036444 042737 000004 006600 DVIN31: BIC WORX, FLAG ZCLEAR RX COMPLE. 
6541 036452 012737 002657 011512 MOV #RHDMSG+1 ,RMSGPT :SET UP POINTER 

6542 0 013737 002654 011514 MOV HDMC ,RMSGCC 3 

6943 TENABLE RCVR. 

6345 036466 052777 000160 152756 BIS #RINTEN! RXENA! DSITEN, @RXCSR 

6347 :SET UP TXMITTER TO SEND 

6549 036476 737 036574 DVIN32: JSR SET 

6550 0 500 7 1010 BIC OG TXtPAD. FLAG oer AR TX COMPT FLAG. 
6551 12737 645 01150 MOV #HDMSG+1 .MSGPTR [MOVE THE CURRENT POINTER TO MSGPTR. 
6552 036514 013737 54 011504 MOV HDMC ,MSGCC 

6553 0365 12737 10 11506 MOV #8... SYNCC :SET UP SYNC COUNT 
6954 0365 5 120 1527 BIS #TXENA! TINTEN, @TXCSR 

632 sNOW WAIT FOR TIME OUT OR TX COMPLETE 

65 5 DVIN35: BREAK 

6338 333 104422 TRAP C$BRK 
6560 5 006644 TST TIMER z1S IT TIMED OUT 

6561 544 161 BEQ DVI SIF YES EXIT 

6366 546 000010 006600 BIT #OQTX.FLAG [1S TX DONE 

o3e; Osees6 3 oe NIN os aU EAR ATS te wesee oe UT 
6565 228 3h head 006600 BIT WORX, FLAG [DID WE RX ANYTHING 





G 13 
CVCLHC waa ATA oS og LaNK TEST MACY11 30A(1052) 23-MAR-82 16:43 PAGE 163 


SEQ 162 
CVCLHC.P11 DEVICE TRANSMIT CONTROL MSG 


6 0 63) BEQ DVIN32 31F NOT RETRANSMIT LAST 
ese sre DVINS4: RTS PC ;RETURN TO CALLER 


CVCLHC_DPV=11 
CVCLHC.P? 


SR eee eee EeeeCboneeee dacs 


022737 
001500 


000001 


006534 


001790 
0017 

7 00657 
7 Spates 


006640 


801750 


020000 
006640 


006570 


006600 
006534 


Boses0 
007554 


Sti 


152522 


H 13 
SUR ta Te 


MACY11 30A(1052) 23-MAR-82_ 16:43 PAGE 164 
DEVICE RTS TO CTS DELAY 


eSBTTL DEVICE RTS TO CTS DELAY 


FUNCTIONAL DESCRIPTION: 
CTSSR--THIS ROUTINE SETS REQUEST TO SEND TO MODEM 
AND CHECKS FOR CLEAR TO SEND T 
IF CTS DOES NOT COME BACK BEFORE TIMER EXPIRES 
AND ERRCR IS REPORTED AND WE TRY AGAIN. 
THE ROUTINE IS SKIPPED IF INTERNAL LOOP IS SET. 


3 OUTPUTS: 


SUBORDINATE ROUTINES USED: 
“LGDVE" - 


CALLING SEQUENCE: 
JSR PC,CTSSR 


LOG DEVICE ERROR 


CTSSR: CMP #1 ,MLTYP 31S THIS TTL LOOP 
BEQ DVTXRO 3BR IF YES 
sSET RTS AND WAIT FOR CTS 

DVTXR3: BIT #FIRST,FLAG 
BNE C 


TSS3 zIF NOT FIRST TIME SKIP DELY 
MOV #-1, TEMP 
CTSS4: INC TEMP 
BREAK 
TST 
BNE :1F NOT ZERO GO BACK 


CTSS4 
BIS #FIRST,FLAG SET FIRST FLAG. 
CTSS3: MOV #1000.,TIMERT ;1 TICKS 
FHDPLX sFULL DUPLEX ? 
YES BRANCH 


BNE CTSS YES. 

>:CHECK FOR CARRIER 

10$: CALL. OD :GET MODEM STATUS 
BIT #DCD, MODS [CARRIER PRESENT? 
BEQ CTSS? NO 
TST TIMER1 [TIME DONE? 
BEQ CTSs/ YES, BRANCH 
BR 0s [D0 IT AGAIN 


CTSS7: BIS #RTS ARXCSR sSET REQUEST TO SEND 
V #1000.,TIMER1 :SET UP TIMER 
DVTXR2: BREAK 


BIT #CTS,@RXCSR :1S CLEAR TO SEND BACK 
BNE VTXR1 *BR. IF CTS IS SET 

TST TIMER) SELSE TEST IF TIME EXPIRED 
BNE DVTXR2 *BR IF TIME NOT EXPRIED. 


3SET ERROR FOR NO CTS 


TRAP 


TRAP 


CSBRK 


SEQ 163 











I 13 
LINK TEST MACY11 30A(1052) 23=MAR-82_ 16:43 PAGE 165 





CVCLHC_DPV-11 elke COMM. 
CVCLHC.P11 22-MAR-82 11: DEVICE RTS TO CTS DELAY 
12737 017 54 MOV #DVEM1 , TEMP 
139 :. 2 Oo¢3¢e MOV @RXCSR, TEMP 
17737? 1525 00654 MOV @TXCSR, TEMPS 
7 pee) JSR PC ,LGDVE 
237 506 INC ERRCNT 
457 ERRSOFT 6,DVEM1,ERR13 


TRAP CSERSOFT 

1 026 “WORD DVEM1 

176 "WORD ERR13 
700 soba: BR DVTXR3 :THEN TRY TO SET RTS AGAIN 

DVTXR9: RTS PC : 


PEER RENT R ISS 
ei § 
3 


2 
5 


RUE te Te 


SERIE 


002000 006540 


RASaS S33 


Pwo O00 


000004 152406 


SEIS. 
PAA 
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SEQ 165 
MACY11 30A(1052) 23-MAR-82 16:43 PAGE 166 
DEVICE CLEAR REQUEST TS SEND 


oSBTTL DEVICE CLEAR REQUEST TO SEND 


"FUNCTIONAL DESCRIPTION: 
THIS ROUTINE CLEARS REQUEST TO i IF 
DUPLEX MOD 


: IN HALF E OR MULTI-POINT 
: CALLING SEQUENCE: 
; JSR PC, CLRRTS 
CLRATS: 
TST MPPTP :MULTI-POINT? 
BNE 208 7 YES BRANCH 
TST FHDPLX ‘Ts "ins FULL DUPLEX 
BNE DVTR *BRANCH IF YES 
20$: MOV #2000, TEMP2 
CLRR1: DEC TEMP 
BNE CLRRI :DELAY A WHILE TO ALLOW CRC 
[TO BE TXMITT'D BEFORE YOU 
BIC #RTS ,A@RXCSR SCLEAR REQUEST TO SEND 
DVTRS: RTS PC SRETURN TO CALLER 


CVCLHC_DPV-11_ DATA a A NK TEST 
CVCLHC.P11 22-MAR-82 


$ 
ae 


POSS Resa aad 


708 037067 


037046 000000 


037050 000000 
037052 000000 


037054 
037055 
03705 
03705 


037060 
037061 


037068 
037063 


$3 83 88 8888 88 


K 13 
MACY11 30A(1052) 23-MAR=82 16:43 PAGE 167 
DEVICE CLEAR REQUEST TO SEND 


~SBTTL DDCMP PROTOCOL MODULE 


3 RERRAARERAARARARRERARRRERERERERERREREARREERRERAEREERAERREREREREREEEAEEERRERERERER 


: DCLT DDCMP PROTOCOL MODULE: 

3 THIS CODE WAS WRITTEN TO BE USED ONLY WITH DCLT. 
-EVEN 

33 LOCAL STORAGE 

ae TABLE OF STATISTICS AND ERRORS 

oe3 NOTE: KEEP THE VARIABLES TOGETHER AND IN SEQUENCE 

see OTHERWISE THE RPT> ROUTINE WILL PRINT WRONG INFO. 


PRSTAT: .WORD 0 s STATUS FLAGS 


ART 
TMESTX: .WORD 0 TOTAL DATA MESSAGES TRANSMITTED(16 BIT COUNTER 
TMESRX: .WORD 0 S TOTAL DATA MESSAGES RECEIVED(16 BIT COUNTER) 
N: BYTE 0 34 OF HIGHEST SEQUENTIAL DATA MESSAGE TRANS 
MITTED BY THIS S 
A: .BYTE 0 ch OF THE HIGHEST + SEQUENTIAL DATA MESSAGE 
+; THAT HAS BEEN ACKNOWLEDGE TO THIS STATION 
T: BYTE 0 :# OF THE NEXT DATA MESSAGE To BE TRANSMITTED 
X: “BYTE 0 SLAST MESSAGE NUMBER TRANSMITTED 
R: BYTE ZLAST MESSAGE RECEIVED 
TRIBN: .BYTE :TRIB ADDRESS PT TO PT = 1 
ERROR COUNTERS 
REMTMO: .BYTE sREMOTE REPLY TIMEOQUTS(ACKS SENT NUM=R) 
GLOBCC: .BYTE [GLOBAL CRC ERRORS 
REANAK: .BYTE :REASON FOR LAST NAK SENT 
SELTHER: .BYTE SSELECTION THRESHOLD ERROR 
RXTHER: .BYTE 3RECEIVE THRESHOLD ERRORS 


TXTHER: .BYTE 3 TRANSMIT THRESHOLD ERRORS 


SEQ 166 


L 13 


CVCLHC_DPV-11 Bale TA on oe TEST MACY11 30A(1052) 23-MAR=82 16:43 PAGE 168 
CVCLHC.P11 DDCMP PROTOCOL MODULE 


SEQ 167 


037070 DEROUT: .BYTE 0 zDATA ERRORS QUTBOUND (NAKS RECEIVED 
7071 OUTMASK: .BYTE 0 REASONS = 1,2,0R 3) 
{ASK VALUES == == B1T0 = HEADER CRC ERROR 
: = DATA FIELD CRC ERROR 
: _ =. BIT = REP RESPONSE NUM<>R 


DERIN: .BYTE 0 ;DATA ERRORS NBOUND (NAKS TRANSMITTED 
INMASK: .BYTE 0 REASONS : OR 

tHASK VALUES == “6 19 = HEADER CRC ERROR 
: = DATA FIELD CRC ERROR 
: -- =. BI = REP RESPONSE NUM<>R 


LBUFER: .BYTE 0 ;LOCAL BUFFER ERRORS (NAKS SENT 

LBMASK: .BYTE 0 REASONS = 8. OR 1 
ThASK VALUES -- BITO = BUFFER NOT AVAILABLE 
: <= BIT] = MESSAGE TOO LONG 


RBUFER: .BYTE 0 Ha py dls Ons’. OR 16 ERRORS (NAKS RECEIVED 


RBMASK: .BYTE 0 aR 
; ALUES -- =- Biro = BUFFER NOT AVAILBLE 
; = MESSAGE TOO LONG 


RMSTER: .BYTE 0 :REMOTE TE STATION ERRORS (NAKS RECEIVED 
ay cMASR TV ALUES== BiT0 = RECEIVER OVERRUN 
: = FORMAT ERROR 
LOSTER: .BYTE 0 LOCAL STATION ERRORS (NAKS SENT 


LSMASK: .BYTE 0 ; 
SiaSK VALUES == == 8110 = RECEIVER OVERRUN 
: BIT1 = FORMAT ERROR 


RXTXTE: «WORD 3RX AND TX THRESHOLD ERRORS (OVERFLOWS) 


03707 
03707 


88 


037074 
037075 


03707 
03707 
037100 
037101 


03710 
03710 


sEND OF PROTOCOL ain 
OF MAIN eaves, 


RX Db thc SENT 
ED & *ACK* RECEIVED 


seciest eases ee 


-1 = 
so] . STACK SENT 
READY TO SEND ANOTHER MESSAGE 
PR DOCS MT me TGs USED IN THIS MODULE 


~ 
= MUL 
=THIS STATION om NOW TRANSMIT (HALF /DUPLEX) 
COPY OF PROTOCOL STATUS WORD 
SED WATF COMMUNI CATE WITH RX paren. ROUT INE 
EX OR MULTI-POINT 


EMPORARY Y WORK LOCAT 
1=R w tt VER 1h ALREADY ON 


TURNON: .WORD I 
TIMEOUT: .WORD 0 20 = PRINT ‘TX OR RX NOT COMPLETE’ 





CVCLHC shh ATA mat NK TEST 


CVCLHC.P11 


9 
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SEQ 168 
MACY11 30A(1052) grt 16:43 PAGE 169 
DDCMP PROTOCOL MODULE 


3: NAK REASONS VALUES AS USED IN NAK CONTROL MESSAGES 


ADBCC = 1 i. BCC_ERROR. 
ATABCC = § ;DATA BCC ERROR ~ 
REPSENT = zREP_RESPONS 
FFNA = 10 sBUFFER TE ILY NOT AVAILABLE 
XOVRUN = 11 ZRECEIVER OVERRUN 
MESLONG = 20 SMESSAGE TOU LONG 
FORMERR = 21 ZHEADER FORMAT ERROR 


3: ADDITIONAL NAK BIT MASKS AS USED IN COUNTERS 


REPMSK = BIT2 sREPLY RESPONSE 

RXOVMSK= B1TO RECEIVER OVERRUN 

FMTMSK = BIT1 SFORMAT ERROR 

MTLMSK = BIT1 sMESSAGE TOO LONG 

BNAMSK = BITO ;BUFFER NOT AVAILABLE 
33 MESSAGE TYPE DEFINITIONS 

SOH = 201 ;DATA_MESSAGE 

MAINT = 144 ERAINTENANCE MESSAGE 

ENQ = 5 CONTROL MESSAGE 


33SUBTYPES OF CONTROL MESSAGES 


ACK = 1 sACKNOWLEDGE MESSAGE 

NAK = ZNEGATIVE ACKNOWLEDGE MESSAGE 
REP = ;REPLY TO MESSAGE NUMBER 

STRT = 6 ZSTART MESSAGE 

STACK = 7 ZSTART ACKNOWLEDGE MESSAGE 


33STATUS WORD BIT DEFINITIONS 


BCCOK = WH? sBCC CHECKED GOOD 
BCCBAD = BIT 38CC CHECKED BAD 
SACK = arr sSEND ACK 
s é 
SDATA = BIT4 2SEND D. 
RXD = BIT SRECEIVER, DONE 
NAKRX = BITS 3NAK RECEIVED 
MYDATA = BIT9 sMY DA 
SSTACK = BIT10 3 SEND sr ACKNOWLEDGE 
SSTART = BIT11 3SEND STAR 


N 13 


SEQ 169 
CVCLHC DPV-11_ DATA COMM. LINK TEST MACY11 30A(1052)_ 23-MAR-82 16: ae PAGE 170 
CVCLHC.P11 22=MAR-82 11:9 DDCMP PROTOCOL MODULE 
11 
esl PRRAAAAAAAAAAAAAAAAAAAATAAATARAAAAAAAAAAAA AAA AAA AAA AAA AAS ny meagre 
681 ; THE BELOW TABLES “ ASCIZ MESSAGES ARE USED IN DCL 
oat : REPORTING OF ERROR COUNTERS. THEY MUST REMAIN IN THE 
oat? ; CURRENT SEQUENCE ELSE WE*LL BE REPORTING ERRONEOUS 
6817 [RRRRERARAREREAREREEREREAAERERERAARERAAARERATAAAHAAAAeeetTAeKAeReReAeAee 
18 
6819 037146 0 7e36 STALST: .WORD STAOA sPOINTER FOR OFFSET 0 ASCII 
6820 037150 03730 eWORD STAIA SPOINTER FOR OFFSET 1 ASCII 
6821 037152 037 WORD STA2A sPOINTER FOR ET § ASCII 
oes 037154 03737 - WORD POINTER FOR OFFSET 3 ASCII 
682 937126 037471 »WORD STASA sPOINTER FOR OFFSET 4 ASCI! 
6824 0371 037555 ~WORD STASA POINTER FOR OFFSET 5 ASCI! 
6825 037162 037635 » WORD sPOINTER FOR OFFSET § ASCII 
037164 037721 WORD §$ sPOINTER FOR OFFSET 7 ASCIi 
037166 et Se eWORD STAIOA sPOINTER FOR OFFSET 10 ASCII 
gai 040965 ~WORD  STAIIA sPOINTER FOR OFFSET 11 ASCII 
037172 040162 ~WORD STAI2A sPOINTER OFFSET \¢ ASCII 
037174 040256 WORD STAISA POINTER FOR OFFSET 15 ASCII 
037176 040554 ewORD STAISA sPOINTER FOR OFFSET 14 ASCII 
037. 040652 eWORD STAISA 3POINTER FOR OFFSET 15 ASCII 
037202 ot Fe84 eWORD STAI POINTER FOR OFFSET 16 ASCII 
037204 04062 eWORD STAIZA ZPOINTER FOR OFFSET 17 ASCII 


Las or FOR eo A ROUTINES 


WOR 
:PRIBB: BYTE/BYTE NROUTINE 
3PRIBS: BYTE SPECIAL ROUTINE 


SESE DEE DER IERSEGRERERSERRERRE 


O87 8 1640 STAIND: ,WORD PRIW 
8 721 1640 WORD PRIW 
3 12 021640 WORD PRIW 
721 1666 WORD PRIBB 
3721 1666 WORD = =PRIBB 
37 1666 WORD PRIBB 
3 1986 WORD PRIBB 
7 1 WORD PRIBB 
7 1 WORD PRIBB 
72 1724 WORD PRIBS 
7 1724 WORD PRIBS 
7 1724 WORD PRIBS 
7 1724 WORD PRI 
oe 3 & 1724 WORD PRIBS 
38 724 1724 WORD PRI 
5 5 1640 WORD PRIW 
35 WORD ;LAST_MESSAGE TO PRINT 


TO PRINT 


000000 Ts a 3 T 
50 000000 ait WORD SFIRST MESSA 
1 5 YUUUUL MES: WORD ;HOL dS MES 
000000 MESDATA:. [DATA PART OF MESSAGE 
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SEQ 170 
CVCLHC_DPV-11 DATA COMM. LAK NK TEST MACY11 30A(1052) li 16:43 PAGE 171 
CVCLHC.P11 22=MAR=B82 11:09 DDCMP PROTOCOL MODULE 
6864 
6855 RRRARRRREARAAAAAAAAKEAEAAAEAAAAKRAAARAKKKeeeRAKKeeeKaKteeeeeneeeeaeeteeeneeet 
erg] : THE BELOW ASCIZ MESSAGES USED IN ‘RPT>* LEVEL OF DCLT 
686 : 
6868 NL = BEX 
037 3 047045 elo er 0 466 STA eASCIZ /2NZ062%S onde FLAGS/ 
045 022516 03311 STAIA! eASCIZ /ENZO06ZS2ZADATA MSGS. Na 
$3 045 022516 033117 sree eASCIZ /2NZ062S ZADATA MSGS. _RX°CVD/ 
037 397 045 022516 031517 STASA: .ASCIZ /ZNZOS5ZS5ZAHIGHEST MSG : TX. DENEOSESSEANI GEST MSG # ACK'D/ 
037471 045 022516 031517 STAGA: .ASCIZ /ZNZO3ZSSZANEXT MSG # TO TX2NZ032S5 ST MSG # TX'D/ 
037555 045 3 516 031517 STASA: .ASCIZ /ZNZO3ZSS5ZAHIGHEST MSG # Wd SSZATRIB ADDR/ 
037635 045 2516 031517 STAGA: .ASCIZ /ZNZO3ZSS5ZAREMO'E TI S3NZ0 GLOBAL CRC _ERRS/ 
037721 045 oss216 O31317 STA7A: .ASCIZ /ZNZO32ZSSZANAK_REAS phe sh rs) ECT THRESH. a, 
0003 045 022516 031517 STAIOA: .ASCIZ /ZNZO3ZSSZARX_ THRESH ERRSZNZO35ZS5ZATX THRESH. ERR 
040065 045 bos 18 031517 STAIIA: .ASCIZ /2ZNZO Beteseata ERRORS OUTZNZS8ZAHBCC 201 Ay FOIA REP zor 
040162 047045 047445 022463 erage eASCIZ /2NZO3ZSSZADATA ERRORS eric ote 201ZA BCC ZO1ZA REP 201/ 
040256 047045 047445 ossees TAI3A: .ASCIZ /ZNZO3*SSZALOCAL BUFFER ERRSZNZS8ZA NO BUFF 1O1KA TOO BIG %01/ 
040354 047045 047445 022463 STAI4A: .ASCIZ /ZNZO3ZS5ZAREMOTE BUFFER ERRSINZS82A NO BUFF od TOO BIG 201/ 
0452 047045 047445 022463 STAI5SA: .ASCIZ /2NZO35ZSSZAREMOTE STA ERRSINES SZAOVRN %012A_ FORMA Na 
040540 047045 047445 beseoe STAIGA: .ASCIZ /ZNZO3ZSSZALOCAL STA ERRSZNZS8ZAOVRN 201ZA FORMAT 
045 622516 033117 STAIZA: ty /2NZO6XS2ZATX & RX THRESHOLD ERRORS (OVERFLOW) / 
eLIST BEX 
6069 [RRRARRERRRRARRRRERAERERERAERARAAREERRAAREERAARERERARAAARAAAAAEAAAEAAAAAAATTt 
6871 
6872 
6873 
6874 
6875 
6876 
6877 
6878 
6879 
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SEQ 171 
CVCLHC DPV=11 DATA COMM, it NK TEST MACY11 30A(1052) 23-MAR-82 16:43 PAGE 172 
CVCLHC.P11 22=MAR-82 1 DDCMP PROTOCOL MODULE 
6881 
igo“ Minnie nai anoneatEicnimaRn 
raat ; PROTOCOL ROUTINE: 
$88 +1 3 DESCRIPTION: IF THE USER SPECIFIES THE "/PROTOCOL' SWITCH THIS 
6886 ; ROUTINE WILL BE CALLED. THIS ROUTINE DECIDES IF 
6887 3 WE ARE TRANSMITTING AND/OR RECEIVING AND CALLS 
6888 3 THE NECESSARY DDCMP PROTOCOL ROUTINES. 
6890 : KL RERERERARRERAREREERERERRERERERERERAREEEERERREEEREREERERERERREREREREREEE 
6891 
689 
6893 040702 013737 006600 037112 PROTOC: MOV FLAG, IMFLAG sSAVE COPY OF MAIN CODE "FLAG’ VARIABLE 
6894 040710 012737 000001 037122 . MOV #1, TXREADY TINIT TRANSMIITER DONE FLAG 
6895 040716 005037 03711 CLR RXPRC ‘INIT RX PROCOTOL DONE 
68% 040722 005037 037116 CLR TXPRC SIMIT TX PROCOTOL DONE 
6897 040726 005037 037144 CLR TIMEOUT SINIT PRINT 
040732 032737 000100 006574 BIT #PRORUN,PARAM PROTOCOL RUNNING ? 
6899 040740 001067 BNE 7$ YES, BRANCH 
6901 z: PROTOCOL NOT RUNNING -- SO FIRE UP THE LINK 
6902 040742 SETVEC INVEC,A#PRRXI,APRIO4 [LOAD RX PROTOCOL INTERRUPT ROUTINE 
6903 040742 012746 000200 MOV #PR104,-(SP) 
040746 012746 044504 MOV #PRRXI.~(SP) 
6905 040752 013746 011464 MOV INVEC,-(SP) 
040756 012746 MOV #3,- 
6907 040762 104437 TRAP 
6 040764 062706 000010 ADD 10, 
6909 040770 005037 037136 CLR HDXMTP sINIT HALF DUPLEX/MULTI-POINT FLAG 
6910 040774 005737 006572 TST FHDPLX sHALF DUPLEX ? 
6911 041000 001403 BEQ 2$ YES, BRANCH 
6912 041002 005737 037126 TST MPPTP [MULTI POINT ? 
6913 041006 00140 BEQ 3$ NO H 
6914 041010 012737 000001 037136 28: MOV #1,HDXMTP ‘SET HALF DUPLEX/MULTI-POINT 
6916 041016 012737 000036 006644 3$: MOV #30., TIMERS 230 SECONDS TO START 
6917 041024 012737 1 037130 MOV #1,SELECT SINIT § 
6918 041032 005037 0 142 CLR TURNON sINIT vET ANOTHER FLAG 
6919 041036 005037 37124 CLR PRUN SINIT ANO 
6920 04104 5037 037120 CLR ASTRT SINIT *STACK SENT FLAG 
6921 04 1046 005037 037046 CLR PRSTAT SINIT STATUS WOR 
6922 041052 004737 041730 JSR PC,PROINT SINIT PROTOCOL COUNTERS AND VARIABLES 
6923 041056 005737 037126 TST MPPTP 3MULT 1 = POINT MODE ? 
6924 04 1062 001 5 BNE 4$ YES BRANCH 
6925 1064 2737 900 037046 BIS WSSTART.PRSTAT TELL TX ROUTINE TO SEND ‘START 
6926 041072 004737 045350 JSR PC, TXPROTO *GO SEND 
692 04107 0047 7 100 4$: JSR PC“RXPROTO :60 WAIT FOR "STACK" OR 'START® 
6928 04110 2737 100 006574 BIT #PRORUN,PARAM :DID PROTOCOL START ? 
6929 04111 174 BEQ 3$ *NO,TRY AGAIN 
6930 041112 012737 000001 037124 MOV #1,PRUN STHIS FLAG USED IN RXPROTO ROUTINE 
69 IF HALF DUPLEX OR MULTI POINT, WE MUST MANAGE THE LINK DIFFERENTLY 
693 11 012737 900005 006644 7: MOV #3. , TIMERS :SET UP TIMER 
6934 0411 737 (0371 TST HDXATP SHALF DUPLEX OR MULTI - POINT? 
6935 0411 1076 BNE BROMDX : YES,BRANCH 
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SEQ 172 
MACY11 30A(1052) 23-MAR=-82 16:43 PAGE 173 
DDCMP PROTOCOL MODULE 


33 IF FULL DUPLEX AND ACTIVE MODE-- JUMP 
MP #ACT ,MODTYP sACTIVE MODE? 


BEQ 2008" ‘YES, BRANCH 
s: PROTOCOL IS RUNNING == LINK IS HOT SO SEND DATA 
10S: aI #OTX, IMFLAG HRereaaten A MESSAGE ? 
20$: BIS WSDATA,PRSTAT SEND DATA FLAG 
CALL‘ TXPROTO :60 SEND THE MESSAGE 
CALL RXPROTO *CHECK THE REPLY 
TST TXPRC [MESSAGE TRANSMITTED & “‘ACK*ED'? 
BEQ 20$ : CH 
INC TMESTX [BUMP “TOTAL MESSAGES TRANSMITTED'’ COUNTER 
100$: TST RXPRC gRECEIVE PROTOCOL FINISHED ? 
BNE 110$  YES,BRAN 
BIT #ORX, IMFLAG SRECEIVING A MESSAGE ? 
BNE 105$ YES BRANCH 
JMP PROTEX EXIT 
105$: CALL RXPROTO 360 PROCESS INCOMING MESSAGE 
100$ 3SEE IF RECEIVE PROTOCOL COMPLETE 
110$: INC TME SRX SBUMP "TOTAL MESSAGES RECEIVED’ COUNTER 
JMP PROTEX EXIT 


zz ACTIVE MODE (FULL DUPLEX AND POINT TO POINT LINKS) 


2008: CALL = RXON TURN ON RECEIVER 
10$: BIS WSDATA.PRSTAT  :SEND DATA FLAG 
CALL §_ TXPROTG :DO SEND DATA MESSAGE 
215$: CALL § RXPROTO 60 SEOrESS. INCOMING MESSAGE 
TST TXPRC [TX PROT OCOL DONE ? 
BEQ 210$ :NO, 
TST RXPRC RX “PROTOCOL DONE ? 
BEQ 215$ ZNO, 
INC TMESRX BUMP ‘TOTAL MESSAGES RECEIVED’ 
INC TMESTX *BUMP “TOTAL MESSAGE SENT’ COUNTER 
TXREADY SET IN TX INTERRUPS ROUTINE 
550$: TST TAREADY sMESSAGE SENT ? 
BEQ 220 °NO, BRANCH 
CALL _ RXON [TURN ON RECEIVER 
JMP PROTEX EXIT 


zzz THIS ROUTINE(PROHDX) IS USE IN HALF=-DUPLEX PT-PT & MTP 


PROHDX: 
10S: TST FHDPLX sFULL DUPLEX ? 
BNE PROF DX 3 YES BRANCH 
BIT #QTX, IMFLAG ; TRANSMITTING ? 
BEQ 100$ ;NO.BRANCH 
20S: TST SELECT 7D0 WE HAVE THE SELECT BIT ? 
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SEQ 173 


MACY11 30A(1052) case 16:43 PAGE 174 
DDCMP PROTOCOL MODUL 


e@e 
= 


+ SEND DAT 
G 


c 
[BUMP TOTAL MESSAGES SENT 
*SET TX PROTOCOL DONE 
iRX «PROTOCOL DONE ? 

* YES BRANCH 
3RECEIVING ? 
; YES BRANCH 


sHAVE WE * RECEIVED THE SELECT BIT YET? 


ZYES, 
TURN ON RECEIVER 
PROCESS D DATA 


AGAIN 

3 SEND ACK TO TURN THE LINE AROUND 
760 RECEIVE THE PENDING MESSAGE 
[BUMP RECIEVED MESSAGE COUNTER’ 
ayo 


33THIS ROUTINE(PROFDX:) USED WITH FULL DUPLEX-MULTI POINT LINKS 


3 TRANSMITTING ? 


eBRANCH 
SSET TRANSMIT PROTOCOL COMPLETE 
os THE 1ST MESSAGE RX°ED DURING STARTUP? 


S$, BRANCH 

CRECEIVING ? 

7 YES BRANCH 

3SET RECEIVE PROTOCOL COMPLETE 
3PROCESS INCOMING MESSAGE 


?NO, BRANCH 

*BUMP RX MESSAGE COUNT 

sBRANCH 

:ANYTHING TO SEND ? 

3NO,BRANCH 

:D0 WE HAVE PERMISSION TO SEND ? 
7 YES BRANCH 


: ON TX 
WAIT ON SELECT BIT 


BNE 30$ 
CALL §_RXON 
258: CALL RXWAIT 
BR 20 
30$: BIS #SDATA, PRSTAT 
CALL _ TXPROTO 
CALL T0 
TST TXPRC 
BEQ 208 
INC TME: TX 
100$: MOV #1, TXPRC 
103$: TST RXPRC 
BNE 150$ 
BIT #ORX, IMFLAG 
BNE 11 
PROTEX EXI 
“WAS THe MBALL TOSSED BACK IN ouk® COURT 
iios:  TsT SELECT 
BNE 130$ 
CALL = RXON 
115$: CALL RXWAIT 
BR 103$ 
130$: BIS #SACK,PRSTAT 
CALL ‘ TXPROTO 
CALL _RXPROTO 
BR 103$ 
150$: INC TMESRX 
CALL = RXON 
JMP PROTEX 
PROFDX: BIT #OTX, IMFLAG 
BNE 1 
MOV #1, TXPRC 
10$: TST RXPRC 
BNE 30$ 
BIT WORX, IMFLAG 
BNE 20$ 
MOV #1, RXPRC 
BR 106$ 
20$: CALL §RXPROTO 
TST RXPRC 
BEQ 208 
30$: INC TMESRX 
BR 100$ 
100$: TST TXPRC 
BNE 135$ 
120$: TST iis 
BNE 
CALL 
125$: CALL A UAIT 
BR 120$ 
130$: BIS #SDATA,PRSTAT 


STRY_ AGAIN 
SEND DATA FLAG - 
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SEQ 174 
CVCLHC DPV-11 DATA COMM. LINK TEST MACY11 30A(1052) mop R82 16:43 PAGE 175 
CVCLHC.P11 22=MAR-82 11: DDCMP PROTOCOL MOD 
7049 06164 7 $350 CALL TXPROTO ZSEND DA TA 
7050 041 737 31 CALL §_ RXPROTO CH HECK REPL 
51 04165 5737 037116 TST TXPRC ; TRANSMIT EROTOCOL DCNE ? 
% 165 17 BEQ 120$ NO GAIN 
705 1 3¢ 037050 INC TMESTX ; TOTAL MESSAGE SENT’ COUNTER 
7054 041664 004737 041774 135$: CALL RXON [TURN ON RX SO THAT WE WON'T MISS ANY MESSAGES 
7055 i: WHILE WE juve 
7056 041670 022737 177777 037052 PROTEX: CMP #~1, TMESRX 33 
705 1676 BNE 10$ :NO, BRANCH 
7058 041700 005 03705 3 DEC TME SRX SLATCH AT 177776 
7059 041704 022737 177777 037050 10$: CMP #~1, TMESTX 3MAX? 
7060 041712 BNE 15$ 
7061 041714 33 9370 59 DEC TMESTX :LATCH AT 177776 
206¢ 1720 13737 037112 006600 15$: MOV IMF LAG, FLAG RESTORE ‘FLAG’ TO ITS ORIGINAL VALUE 
1726 ? RTS PC tEXIT 
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SEQ 175 
MACY11 30A(1052) alia 16:43 PAGE 176 
DDCMP PROTOCOL MODUL 


"ny ial clam cnaea  sctnsine eet era ainerte ohemmmetronancaiat tela 
PROTOCOL INIT ROUTINE: 

; THIS ROUT INE WILL INITIALIZE THE ERROR COUNTERS AND MESSAGE 
; COUNTERS AS NEEDED FOR PROPER DDCMP PROTOCOL OPERATION. 

; DURING NORMAL OPERATION THIS CODE WILL BE CALLED ONCE FROM 

: PROTOCOL STARTUP ROUTINE. 


SRRRRRARRRERERERARERAEEREEEAAR EERE RERARERRRERRREERE CRRREREREEREEREREEERE EES 


PROINT: MOV R1,-(SP) SAVE 
MOVB =« TRIBN, TEMP [SAVE TRIB NUMBER 
MOV #PRSTAT,RI1 SFIRST LOCATION 10 CLEAR 
10$: CLR + :CLEAR AND 
CMP R1, #PROEND SLAST LOCATION. TO CLEAR 
BNE 0 NO, BRANCH 
20$: MOVB  TEMP,TRIBN GRESTORE TR TRIB # 
MOVB #1 “FIRST MESSAGE # TO BE TRANMITTED 
MOV (SP)+,R1 SRESTORE R1 
RETURN TEXIT 


ag ea any tte cere agent aati cer ia tet i atm tea coe 


; TURN ON RECEIVER ROUTINE: 


; DESCRIPTION: THIS ROUTINE SIMPLY ENABLES THE RECEIVER AND 
: INITIALIZES VARIABLES. 


© RERAARRAERARAAERERARAREEEEREREERERAERAEREERARARAARAREREREREREEERERREEREREEE 


RXON: TST TURNON iRX ALREADY ON ? 
BNE RXONEX S$ ,BRANCH 
CLR PRSTAT ‘That STATUS WORD 
CLR RHDMSG ‘INIT 1ST WORD OF RX BUFF 


ER 
BIC #ORX'ABCC!ARXM,PRFLAG FLAGS USED IN RX INTERRUPT ROUTINE 
BIS #MYDATA,PRSTAT ;ASSUME MESSAGE FOR ME 

V #RHDMID-RMSGPT 


MO *BUFFER ADDRESS FOR HEADER PART ON MESSAGE 
MOV HDMC ,RMSGCC SINIT CHARACTER COUNT = 6 
BIT SMOciIK PARAM RODEN CHANGES WANTED ? 


BNE 20$ YES BRANCH 
BIS aR NTEN!RXENA, ARKCSR™ s TURN ON RX 


BR H 

208 $: Bis ARINTEN!RXENA!DSITEN, @RXCSR 7 TURN ON RX 
 TURNON zRX 1S ON FLAG 

SRONEX: RETURN 


H 14 


CVCLHC_DPV-11 Balle conn LARK TEST MACY11 30A(1052) wae’ 16:43 PAGE 177 
CVCLHC.P11 11: DDCMP PROTOCOL MOD 


SEQ 176 


gh ne grt mee mage eter ot ata te mnie toate 


; RE CEIVER PROTOCOL ROUTINE: 


: DESCRIPTION: THIS ROUTINE WILL psa AN_INCOMING MESSAGE 

. AND DETERMINE IF IT'S A VALID CONTROL OR DATA 
: MESSAGE. IF AN ERROR 18 DETECTED THE APPROIATE 
; Hea yfOunTERs WILL BE UPDATED BY THE ERROR 


> e 
~ 


a atlas) ab a ad a od 
SSSRVERRANVSSRONAM 


SUBORDINATE ROUTINES USED: ‘‘TXPROTO"’ 
“ERROR PROCESSOR"’ 


© RRAEREE A ARERAEAERARAAREREREEEERAERERREREREEEREREEEAEAEKEREEREERERERERREEEEREEE 


RE 


YYVWVYIIIY 
SNBSRSERR 88 


SSBLEREAG 


RXPROTO: 
CALL RXON 3 TURN ON RECEIVER 


ii : WALT FOR FIRST CHARACTER TO APPEAR IN RX BUFFER 

20$: BREAK :CHECK FOR “C 
TSTB = RHDMID sFIRST CHARACTER READ ? 
BNE 30$ : ES. BRANCH 
TST TIMERS 760 SECONDS ELAPSED ? 
BNE :NO, BRANCH 
JSR PC, ERRPRC [CALL ERROR PROCESSOR 
JMP RXPREX EXIT 


FRRRLRLEL 


BRS 
wr 
~ 


71 
71 
71 
71 
71 
71 
71 
71 
71 
71 
71 
71 
71 


+: IF A CONTROL MESSAGE THEN TELL RX INTR. TO PROCESS HEADER ONLY 
$0s:  CMPB CONTROL MESSAGE ? 


4 3NO,BRANCH 
BIS #RXM, PRFLAG sPROCESS HEADER ONLY 


;; WAIT FOR CRC TO BE CHECKED 
dbs: ait EEC NS PRES sCRC CHECKED ? 


: YES BRANCH 
TIMERS 260 SECONDS ELAPSED ? 


3NO, 
PC, ERRPRC :G0 PROCESS ERROR 
RXPROTO :TRY AGAIN 


YIYIYIIIYYY 
QRURUNLSSSHLSEGE 
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SEQ 177 
CVCLHC DPV-11 DATA COMM LINK TEST MACY11 30A(1052) mop R82 16:43 PAGE 178 
CVCLHC.211  22=MAR=-82 11 DDCMP PROTOCOL MOD 
715 
*: CHECK THAT RX WAS SERVICED QUICK ENOUGH(DETERMINED BY RX INTER. ROUTINE) 

176 032737 000010 037046 45s: BIT #SNAK , P OVERRUN ? 

204 001761 BEQ NO BRANCH 

06 737 04372 JSR PC, ERRPRC 760° PROCESS ERROR 

1 737 0453 JSR PC. TXPROTO :60 SEND NAK 

16 137 0421 JMP RXPROTO ‘TRY AGAIN 


IF HEADER CRC ERROR THEN LOG IT AND SEND NAK 


FRR KRLEF 


RAVISSELETRERLSS 


2298 032737 000002 037046 bis: BIT WBCCBAD,PRSTAT ;CRC ERROR ? 
e2 0014 BEQ NO, BRANCH 
32 0 000010 037046 BIS ASNAK,PRSTAT SET SNAK (SEND NAK) 
042240 152737 000001 03707 BISB § #HEADBCC,INMASK :SET SHE MASK 
042246 112737 900001 037064 MOVB #HEADBCC. *REANAK :NAK REASON = 1 
042254 105237 037072 INCB RIN “LOG DATA ERROR INBOUND 
04 001 3 BNE $ SBRANCH IF NOT OVERFLOW 
1127 377 037072 MOVB #377,DERIN [LATCH COUNTER AT 256. 
75 04 004737 726 55$: JSR PC ,ERRPRC 760 PROCESS ERROR 
7 012737 1 037130 MOV #1.SELECT SASSUME S-BIT WAS SET IN FAULTY MESSAGE 
042302 004737 04 50 JSR PC. TXPROTO :G0 SEND NAK 
042306 000137 042100 JMP RXPROTO :TRY AGAIN 


NOW CHECK THE ADDRESS OF THE MESSAGE- IS IT FOR ME ? 
942312 123737 037061 002664 &0$:  CMPB  TRIBN.RHDADR  ;:MY ADDRESS 
042320 001422 BEQ 70$ :YES, CRANCH 


YIVYYYYIYYYYYIYYISIYIYIIIIYS 


LSLESELRALATALS Zao 


ITS NOT FOR ME, BUT COUNT IT OUT TO ae RX_IN SYNC 
sMESSAGE NOT FOR ME 


71 942522 042737 001000 037046 ’ds: BIC #MYDATA, PRSTAT 
71 0423 032737 000100 037046 BIT #RXD ,PRSTAT :RECEIVER DONE ? 
7187 04 36 1003 BNE BRANCH 
71 04 340 005 006644 TST TIMERS Mave WE DAWDLED LONG ENOUGH ? 
zi 001366 BNE $ 7NO,BRANCH 
7191 042346 032737 000001 037046 65$: BIT WECCOK.PRSTAT DATA CRC OK ? 
71 04 354 001 3 BNE 67$ BRANCH 
71 336 105237 037063 INCB  —«GLOBCC L0G GLOBAL CRC ERROR 
7194 04 000137 042100 67$:  JMP RXPROTO :60 RE-QUE BUFFER 
71 
7192 zz IS IT A CONTROL MESSAGE ? IF IT IS PROCESS IT 
7199 042 105037 057066 70$:  CLRB  RXTHER sINIT RX THRESHOLD ERROR COUNTER 
7200 372 122737 002657 CMPB #ENO,RHDAID 3CONTROL MESSAGE ? 
1 : 14 2 BE YES,BRANCH 
£20 137 043252 JMP 2008 60 PROCESS DATA MESSAGE 
? =: IS IT ANAK ? 
7205 042406 122737 000002 002660 75$: §§ CMPB  #§#NAK,RHDTYP NA 2 
41 1088 BNE NO, BRANCH 
416 000100 006574 BIT #PRORUN,, PARAM PROTOCOL RUNNING ? 
424 001 3 BNE 80$ YES, BRANCH 
4 1 1 JMP RXPROTO SIGNORE THIS MESSAGE 
10 4 7 037046 80$: BIS ANAKRY PRSTAT :FLAG NAK RECEIVED 
11 7 7 JSR ERRPRC 'G0 LOG NAK RE 
le ? 037046 BIS OSBATR PRSTAT :SEND DATA 
1 452 7 JSR PC, TXPROTO [GO RE-TRANSMIT PREVIOUS MESSAGE 
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CVCLHC DPV-11., ATA ATA, COMM LINK TEST MACY11 30A(1052) monn 82 16:43 PAGE 179 
CVCLHC.P11 i1 DDCMP PROTOCOL MOD 


7214 het 000137 042100 JMP RXPROTO 3GO RE-QUE RX 


SEQ 178 
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SEQ 179 
CVCLHC DPV-11 DATA COMM, it NK TEST MACY11 30A(1052) 23-MAR-82 16:43 PAGE 180 
CVCLHC.P11  22=MAR-82 1 DDCMP PROTOCOL MODULE 
15 
1g -> IS IT A ACK ? 
1 462 122737 000001 002660 90s: CMPB #ACK RHDTYP sACK ? 
18 4 1037 BNE 100$ *NO, BRANCH 
19 4 0 37 7 000100 006574 BIT #PRORUN, PARAM SPROTOCOL RUNNING ? 
7231 04 30 (3 000100 006574 BIS #PRORUN, PARAM STELC The WORLD THAT LINK HAS STARTED 
22s 04 $1 is 037056 002662 93S: CHP 1 ,RHDREP CORRECT ME SSAGE # ACKNOWLEDGED ? 
£225 Obedee 005737 037136 TST —-HDXMTP 3HALF DUPLEX/MULTI =POINT ? 
5 10 BNE 97$ 3 YES BRANCH 
7227 042530 0001 042100 JMP RXPROTO AGAIN 
7228 042534 105037 03706 95$: CLRB  TXTHER 3INIT. TX THRESHOLD COUNTER 
7229 042540 113737 037056 037054 MOVB=sédT;CN HIGHEST SEQUENTIAL Me SSAGE # SENT 
7230 042546 11 130 7056 037057 mMOVB si [XX tHIGHEST MESSAGE # 
7231 042554 113737 037055 MOVB = RHDREP,A SHIGHEST MESSAGE # ACKNOWLEDGED TO THIS STATION 
7232 042562 105237 037056 INCB. OTT °# OF NEXT DATA MESSAGE TO BE TRANSMITTED 
7233 042566 012737 177777 037116 MOV #~1, TXPRC : TRANSMIT PROTOCOL COMPLETE 
7234 042574 022737 000003 006566 CMP #act .MODTYP ZACTIVE MODE ? 
7235 04 901010 BNE 97$ BRANCH 
7236 042604 005 037114 TST RXPRC RX PROTOCOL COMPLETE? 
7237 04 610 1005 BNE 97$ YES, SR 
7238 042612 005737 006572 TST FHDPLX Wat keD DUPLEX? 
39 042616 00140 BEQ 97 ves BRANCH 
7240 042620 000137 042100 JMP RXPROTO $60 PROCESS INCOMING MESSAGE 
726 042624 000137 043724 97$:  JMP RXPREX EXIT 
7266 >: IS IT A REP ? 
7245 042630 122737 000003 002660 100$: CMPB  #REP,.RHDTYP :REP ? 
aug 042636 001054 BNE 150$ NO, BRANCH 
7248 33 NUM =R? 
7249 042640 032737 000100 006574 BIT #PRORUN,PARAM ;PROTOCOL RUNNING ? 
7250 04 46 1002 BNE 110$ “Y 
7251 0426 13 942100 JMP RXPROTO SIGNORE MESSAGE- TRY AGAIN 
25¢ 042654 a6i0%5 037060 110$: CHP RHDNUMR ZHAVE WE RECEIVED THIS MESSAGE ? 
7254 Seat 900004 037046 BIS #SACK,PRSTAT —:SE_SEND ACK 
7255 105237 062 INCB = REMTMO [BUMP REMOTE TIME OUT COUNTER 
7256 676 001 3 BNE 115$ *BRANCH IF NOT OVERFLOW 
sh RISMEE Gutear BOERTD 937062 sass, TMP RerramenTO”  HealStageRt OS 
59 106 137 “MP RXPROTO AGAIN 
1 >: NUM <> R 
716 052737 1 037046 120$: BIS #SNAK,PRSTAT SET SEND NAK 
4 112737 7 MOVB  #REPSENT,REANAK :SET REASON FOR NAK 
$ Rierae Woe see PN iain Tt Ot ven 
7% it ; 377 037078 move soft ; ,DERIN SLATCH AT 256. 
746 152737 7073 125$: BISB  #$#REPMSK,INMASK ERROR REASON IS REMOTE TIME OUT 
5 Riera suarer Bee st FE-Hifo Pens Mn 
7, 764 137 0421 JMP RXPROTO :TRY AGAIN 
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SEQ 180 
CVCLHC DPV-11 DATA COMM, LINK TEST MACY11 30A(1052) 23-MAR-82 16:43 PAGE 181 
CVCLHC.P11 22=MAR-82 11: DDCMP PROTOCOL MODULE 
71 
727 ‘ind IT A START ? 
? 770 122737 000006 002660 CMPB«MSTRT.RHDTYP = ; START? 
7% 776 9010 1 E NO, BRANCH 
7275 2737 000100 006574 BIT #PRORUN, PARAM {PROTOCOL RUNNING ? 
7 1007 BNE 0 YES, BRANCH 
77 043010 052737 902000 037046 BIS #SSTACK,,PRSTAT SEND START | ACKNOWLEDGE 
78 043016 JSR PC, TXPROTO "GO SEND STA 
7279 043022 000137 042100 JMP RXPROTO 260 TO RX ROUTINE AND EXPECT ACK OR DATA 
7280 t; "F DMV OR DMP. 
7e8e 043026 052737 900200 006574 160$: BIS WABORT,PARAM =; TELL MAIN CODE TO ABORT!! 
043034 012737 177777 037114 MOV #=1,RXPRC SRECEIVE PROTCOL DONE 
7284 04 3042 012737. 177777 037116 MOV #1. TXPRC : TRANSMIT PROTOCOL DONE 
7285 043050 PRINTF #165$ ‘FATAL ERROR 
7286 043050 012746 043074 MOV #165$,-(SP) 
7287 043054 012746 000001 MOV #1,-(SP) 
7288 043060 01 MOV SP,RO 
7289 104417 TRAP CSPNTF 
7290 043064 062706 000004 ADD #4,SP 
7291 043070 000137 043724 JMP RXPREX EXIT : 
729 
043074 047045 040445 052123 inggs! OF eASCIZ /INTASTART RECEIVED WITH PROTOCOL RUNNING--ABORTING! !/ 
.LIST BEX 
7294 
7295 zz IS IT A STACK 2? IF SO SEND AN ‘ACK’ 
1339 043162 122737 000007 002660 170$: CMPB  &#STACK,RHDTYP ;STACK ? 
7298 04317 901012 BNE :NO, BRANCH 
£99 043172 05273 900004 037046 BIS #SACK,PRSTAT :TELL TX ROUTINE TO SEND ACK 
04 004737 045350 JSR PC, TXPROTO SEND 
7301 043204 052737 000100 006574 BIS #PRORUN,PARAM SET “PROTOCOL RUNNING’ FLAG 
7302 043212 000137 043724 JMP RXPREX EXIT 
7304 
7305 IF WE GOT TO HERE, WE HAVE A STPANGE PROBLEM 
7306 3216 9527 7 900019 037046 180$: BIS WSNAK,PRSTAT | :SET SEND NAK FLAG 
730 2 10 ¢ 7 03710 INCB _—CLLOSTER SLOCAL STATION ERROR 
7308 152737 1 037103 BISB #FORMERR,LSMASK : T ERROR 
aS Suirer Beste se pecfueroto | fetiptaae 
46 000137 042100 JMP RXPROTO Y AGAIN 


zz END OF CONTROL MESSAGE PROCESSOR 


MEWN—O 


add 
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SEQ 181 
CVCLHC DPV-11 BATA COMM. LINK NK TEST MACY11 30A(1052) 23-MAR~B2 16:43 PAGE 182 
CVCLHC.P11 “MAR=82 11:09 DDCMP PROTOCOL MODULE 
731 
ait sz;HERE WE BEGIN PROCESSING DATA PART OF MESSAGE 
9 043252 005737 037114 2008: TST RXPRC yALREADY PROCESSED A MESSAGE? 
56 0014 3 BEQ 15$ :NO, 
1 60 7 901000 037046 BIC #MYDATA,PRSTAT Tec RX INTERRUPT ROUTINE NOT TO STORE THIS 
: 005737 037116 TST TXPRC X PROTOCOL COMPLETE ? 
7323 043272 001037 BNE ves, BRANCH 
4 zs: SEE IF IMPLICIT ACK IMBEDDED iy THIS MESSAGE 
5 043274 123737 037056 002662 CMPB ss T .RHDREP sRESP = MESSAGE SENT? 
7326 O45 2 1033 BNE 220$ ?NO, BRANCH 
ie 043304 113737 037056 037054 MOVB «iT. HIGHEST ‘ SENT 
28 043312 113737 037056 037057 MOVB sir CX SHIGHEST # SENT 
7329 063 113737 037056 037055 MOVB=séT«CA THIGHEST MESSAGE ACK'ED 
7330 043 1032 7 05708 INCB. OTT XT MESSAGE TO SEND 
7331 043332 012737 177777 037116 MOV #~1, TXPRC ?TX PROTOCOL FINISHED 
£332 043340 000137 043724 JMP RXPREX TEXIT 
7334 043344 1952 7 037060 215$: INCB R sEXPECTED #? 
7335 043350 123737 037060 002663 CMPB sR, RHD NUM [CORRECT MESSAGE #? 
7336 043356 001423 BEQ S608 3YES PROCESS IT 
7337 043360 105337 037060 DECB SOR :SUBTRACT 1 
7338 043364 0427 7 001000 037046 BIC #MYDATA.PRSTAT JUST COUNT OUT MESSAGE-DON'T PUT IN BUFFER 
7339 043372 032737 000100 037046 2208: BIT #RXD ,PRSTAT 3WAIT FOR DONE 
7340 04 3400 001003 BNE 50$ CH 
7341 043402 005737 006644 TST TIMERS ?TIME OUT? 
rhe 043406 001371 BNE 220$ [NO, BRANCH 
7344 >SEND AN "'ACK"' 
7345 043410 052737 000004 037046 560§: BIS WSACK,PRSTAT SEND ACK 
7346 043416 004737 045350 CALL § TXPROTO :GO SEND IT 
F347 043422 000137 042100 JMP RXPROTO :TRY AGAIN 
7349 »: IS DATA PART OF MESSAGE COMPLETE ? 
7350 043426 032737 000100 037046 %00$: BIT #RXD ,PRSTAT SMESSAGE COMPLETE ? 
7331 043434 001021 BNE 330$° YES ,BRANCH 
735 : IS THE LINE DEAD ? 
354 3436 005737 006644 TST TIMERS :TIMED-OUT ? 
? 32 tae ies 7 063726 mt Be ERRPRC 2 aD’ PROCESS TIMER ERROR 
7357 50 000137 042100 JMP RXPROTO STRY AGAIN 
oaeg CHECK FOR RECEIVER OVERRUN OR BUFFER PROBLEM 
7360 04 54 050737 000010 037066 $05$: BIT WSNAK,PRSTAT DID RX INTERRUPT SET THIS ? 
7361 3425 1761 BEQ 300$ NO, BRANCH 
z2RX ERROR SEND A NAK AND TRY AGAIN 
e Ghee SUED tare it PE-Fapeoto — Zazupraucss © 
7386 74 000137 042100 JMP Pes TxpRG STRY AGAIN 


aS05:"" BIT i DATA CRC ERROR 
sor eOK. ePRSTAT  ;DATA CRC GOOD ? 
$ ES BRANCH 


300 Oxer35 000001 037046 


ao 

= 
EE 
Wa 
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CVCLHC_DPV-11 DATA on ~ y TEST MACY1) 30A(1052) 2 li 16:43 PAGE 183 
CVCLHC.P11 22-MAR=82 11:09 DDCMP PROTOCOL MODULE 


3; LOG CRC ERROR AND a A_NAK 
037046 BIS #SNAK ,PRSTAT 3SET SEND NAK FLAG 
RIN. BUMP pate ERROR INBOUND COUNTER 


BNE 340 H IF NOT OVERF 
03707 MOVB 7,DERIN BRA AT T 256. 
707 : ea AThbce INMASK :SET DATA CRC BIT 
J PC, é £60 PROCESS ERROR 
PC. TXPROTO 360 END NAK 
RXPROTO :TRY AGAIN 


bad 
Pa ot =] 


RERRLLER 


Ww 
PANAMA 


wires 
ox 


WE HAVE A GOOD MESSAGE !!! $0. ACKNOWLEDGE IT 
ibos: BIT #PRORUN.PARAM PROTOCOL RUNNING? 


$ BRANCH 
037120 TST ASTRT <DID WE SEND A STACK? 
BNE 415$ : YES ,BRANCH 

BR RXPREX xIT 


NOTE: abiv/oPm WILL SEND ‘START = STACK = DATA’ FOR STARTUP SEQUENCE 
000100 006574 iiss: #PRORUN,PARAM  ;SET PROTOCOL RUNNING 


>: CHECK FOR AN IMPLICIT ‘ACK’ 
037056 002662 430$:  CMPB  1,RHDREP sRESP = MESSAGE SENT ? 
BN 450s BRANCH 


3NO, 
7056 037054 T.N HIGHEST SEQ MESSAGE ” SENT 
O3 Oat HIGHEST SAGE 


037116 MOV TXPRC 
037046 : 8 AsAtk 


SR SEND ACK 
037114 MOV #-1 ,.RXPRC :RECEIVE MESSAGE ¢ eee FINISHED 
037124 PRUN ZPROTOCOL RUNNING ? 


BEQ RXPR NO, BRANCH 
037136 SFULL DUPLEX PT-PT? 
BNE RXPREX :NO, BRANCH 
. oo BNe RXPREX iA Rance ’ 
037116 XPRC [TRANSMIT PROTOCOL COMPLETE ? 
BNE ives BRANCH 
042100 RXPROT ob process MESSAGE 


RXPREX: RETURN sDONE !! 


7 
i 
4 
7 
37 
7 
7? 
7 
7 
4 


Sas 
NaN 


nese 


ee  , ,  , “e “ Ts “Te See Te Te Te Te te 2 2|OlCU:. 








B 15 


SEQ 183 
CVCLHC DPV-11 DATA COMM it NK TEST MACY11 30A(1052) 23-MAR~B2 “6:43 PAGE 184 
CVCLHC.P11 22=MAR-82 DDCMP PROTOCOL MODUL 

741 

741 — atiaenappcg eponet e tae a RRERARAAARAAAEAARAARAAAE AEREERERAAEEAREAAERARERE 

gat ; ERROR PROCESSING ROUTINE (ERRPRC): 

74 ; DESCRIPTION: THIS ROUTINE IS USED TO PROCESS INBOUND AND 

7421 : OUTBOUND ERRORS. ALSO THE 60 SECOND ‘WATCHDOG’ 

is) 2 : TIMER IS ENECKED.. 

7426 : THE MAJORITY Of THE CODE IS USED IN PROCESSING 

7425 ; TBOUND ERRORS (NAKS RECEIVED). THE SON 
2486 : TYPE IS D D AND THE APPROIATE E on 

74 : OUNTER IN INCREMENTED. IF RANSMIT THRESHOLD 
7428 : COUNTER CTXTHER) OR RECEIVE THRESHOLD CO NT 

7429 ; EACHES 7 CLEARED 

£430 3 RECEIVE E/TRANSAIT THRESHOLD PRROR CANT ATED VEOUNTER 
6 ; RAERRAAARRAAHKERAARRRAAARERERERERR 5 

l, 

7436 

7435 

0436 z:CHECK THE WATCHDOG TIMER 

7438 043726 005737 006644 ERRPRC: TST TIMERS 360 SECONDS ELAPSED 

7439 043 001075 BN 1 NO, BRANC 

7440 043734 032737 000100 006574 BIT #PRORUN,PARAM PROTOCOL RUNNING ? 

461 043742 001034 BNE 7$ [YES BRANCH 

744 zz INFORM USER OF "START - STACK" TIMEOUT 

744 043744 005037 006542 CLR TEMP3 sINIT IT 

7445 643750 005037 544 CLR TEMPS sINIT IT a 

7446 043754 012737 017311 006540 MOV #DVEMS , TEMP TIME OUT IN, START=STACK SEQUENCE 

7447 043762 113737 002660 006542 MOVB RHDACC + TEMP SRECEIVED DAT 

7448 043770 113737 002646 006544 MOVB MP4 : ITTED DA ATA 

7449 043776 004737 0201 JSR rig cbVE 3LOG TIME OUT IN EVENT LOG 

7450 044002 005237 006506 INC ER CNT RROR COUNT 

7451 044006 ERRSOFT 10. .DVEMS.ERR13 :PRINT ERROR 

7452 044006 104457 TRAP  CSERSOFT 
7453 044010 2 .WORD 10 
7454 044012 17311 “WORD DVEMS 
7455 044014 0176 “WORD ERR13 
7456 04401 5237 906502 INC OPVAR ;BUMP ERROR COUNTER 

7457 0440 12737 000036 006644 MOV #30. , TIMERS SRE-INIT TIMER 

7458 044030 000137 044502 JMP EXIT 

7460 INFORM USER OF ‘DATA MESSAGE’ TIMEOUT 

7461 044034 005237 037144 4: INC TIMEOUT COUNTER 

robe 040 022737 000024 037144 CMP #20. , TIMEOUT 80 SECONDS ? 

746 10 3 BNE 9$ 2NO, BRAN , 
7464 04405 1 01711 54 MOV #DVEM2, TEMP :"TIME OUT WAITING FOR RX OR TX TO COMPLETE" 
7465 056 017737 14537 54 MOV @RXCSR. TEMP SRECEIVER ADDRESS 

466 17737 14537 544 MOV @TXCSR.TEMP4 § ; TRANSMIT ADDRESS 

746 4072 ? 020160 JSR PC, LGDVE [LOG ERROR 

7468 07 5237 506 INC ERRCNT :BUMP ERROR COUNT 

7469 10 ERRSOFT 7,DVEM2,ERR13  :PRINT ERROR 

7470 102 104457 TRAP CSERSOFT 
7471 044104 000007 WORD 
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SEQ 184 
MACY11 30A(1052) geal 16:43 PAGE 185 
DDCMP PROTCCOL MODULE 


.WORD VE 
“WORD ERR 
CLR TIMEOUT zINIT TIMEOUT 
9$: MOV #3., TIMERS :SET UP TIMER 
BR ERREXT SEXIT 


-IF A "NAK' RECEIVED THEN PROCESS IT 
16s: BIT WNAKRX,PRSTAT :NAK RECEIVED? 
BEQ 100$ :NO,BRANCH 


331F TRANSMIT wees COUNTER = 7 THEN BUMP CUMULATIVE TXRX COUNTER 
CMPB a HRESHOLD REACHED? 


BEQ BRANCH 
INnce TXTHER ‘Bune TRANSMIT THESHOLD 

20$: INC RXTXTE {BUMP TRANSMIT/RECEIVE THRESHOLD COUNTER 
CLRB =—« TXTHER *SET TRANSMIT COUNTER TO ZERO 


3233DETERMINE THE ‘NAK' REASON 
sHEADER CRC ERROR ? 


sos: BIC #B81T15!B1T14,RHDTYP sCLEAR SELECT & QS FLAG 
CMPB = #HEADBCC,RHDTYP+1 “HEADER CRC ERROR? 
BNE 5$ *NO,BRANCH 
INCB DEROUT [LOG ERROR 
BNE “BRANCH IF NOT OVERFLOW 
MOVB  #377,DEROUT SLATCH AT 256. 
32$: BISB  #HEADBCC,OUTMASK [SET MASK 
BR ERREXT SEXIT 
“DATA CRC ERROR ? 
$§$: CMPB #DATABCC RHDTYP+1 sDATA CRC ERROR ? 
BNE 40$ CH 
INCB ipl tLOG ERROR 
BNE $ *BRANCH IF NOT OVERFLOW 
MOVB =«a#'377,,D *LATCH AT 256. 
37$:  B1SB SDATABECS OO UTMASK 7SET 
BR ERREXT SEXIT 
*REMOTE STATION BUFFER NOT AVAILABLE? 
ids: CHPB #BUFFNA, »RHDTYP+1 sBUFFER NOT AVAILABLE? 
INCB ER *LOG ER ROR 
BNE 4 $ PBRANCH IF NOT OVERFLOW 
MOVB = #377,RBUFER [LATCH AT 256. 
43$: BISB  #BNAMSK,RBMASK ‘SET MASK 
BR ERREXT TEXIT 
- REMOTE STATION R RECEIVER OVERRUN? 
$$: CHPB  #RXOVRUN,RHDTYP#1 ni, oc 


BNE 505 

INCB RMSTER ERROR 

BNE ? ‘BRANCH IF_NO OVERFLOW 
MOVB #377 RASTER LATCH AT 256. 


CVCLHC_DPV-11 DATA COMM. LANK 
CVCLHC.P11 9 


8e2335 


044502 


152737 
000454 


Nearest 


10523 


Tig737 
152737 
000436 


032737 
001414 


122737 
001403 
105237 
000405 


005237 
105037 
000400 


000207 


22-MAR~82 11: 


000001 


000020 
037076 


000377 
000002 


000021 
037100 


000377 
000002 


000010 


000007 
037066 


037104 
037066 


NK TEST 


037101 


002661 


03707 
03707 


002661 
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\ 
MACY11 30A(1052) A gal 16:43 PAGE 186 
DDCMP PROTOCOL MODULE 


SEQ 7185 


47$:  BISB  #RXOVMSK,RMMASK 3SET MASK 
BR ERREXT EXIT 
“REMOTE STATION MESSAGE TOO LONG? 
bbs: CHPB #MESLONG, »RHDTYP+1 ;MESSAGE TOO LONG? 
BNE 55 BRANCH 
INCB = RBUFER 7106 REMOTE STATION BUFFER ERROR 
BNE :BRANCH IF NO OVERFLOW 
MOVB #377,RBUFER SLATCH AT 256. 
52$:  BISB8  #MTLMSK,RBMASK :SET MASK 
BR ERREXT EXIT 
- REMOTE STATION FORMAT ERR 
bis: CMPB. SU MFORMERR, ROR P+ ;REMOTE STATION FORMAT ERROR? 
BNE 100$ :NO,BRANCH 
INCB = RMSTER SLOG ERROR 
BNE 57$ {BRANCH IF NO OVERFLOW 
MOVB = #377,RMSTER SLATCH AT 256. 
57$: BISB  #FMTMSK,RMMASK SET HAsk 
BR ERREXT TEXIT 


a6 IF SEND NAK (SNAK=1) THEN BUMP RECEIVER THRESHOLD ae COUNTER 


- JF RXTHER = 7 THE BUMP RXTXTE COUNTER AND fLEAR RXT 

60s: BIT | #SNAK.PRSTAT 3SEND NAK 
BEQ ERREXT :NO, BRANCH 
CMPB —s-: #7, RXTHER sRECEIVER THRESHOLD = 7? 
BEQ 126$ YES BRANCH 
INCB —RXTHER [BUMP COUNTER 
BR ERREXT ‘BRANCH 

120$: INC RXTXTE ;BUMP CUMULATIVE COUNTER 
CLRB §- RXTHER TINIT RECEIVER THRESHOLD COUNTER 
BR ERREXT EXIT 


ERREXT: RETURN 
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CVCLHC DPV-11_DATA_ COMM. LINK NK TEST MACY11 30A(1052) alta 16:43 PAGE 187 
CVCLHC.P11 22-MAR-82 11:09 DDCMP PROTOCOL MODULE 


RECEIVER PROTOCOL INTERRUPT ROUTINE 


; "FUNCTIONAL DESCRIPTION: 
; THIS ROUTINE IS USED ONLY WHEN THE ‘‘/PROTOCOL"’ SWITCH 
IS SPECIFIED BY THE USER. 


WHEN A RX ts OCCURS THIS ROUTINE DECIDES IF IT IS A DATA SET 
CHANGE OR DATA INTERRUPT. IF I SET CHANGE 
INTERRUPT IT_PUTS THE STATUS IN Ls AND COMPARES 
THAT STATUS TO THE OLD STATUS IN THEY ARE 
THE SAME THAT MEANS THE INTERRUPT UAS CAUSED "BY A GLITCH 
ON ONE OF THE LINES. IF THEY ARE DIFFERENT THEN A HARD 
MODEM ERROR HAS OCCURED. IN ANY EVENT THE MODEM STATUS 
CHANGE IS LogGeD. 


IF A_DATA INTERRUPT 


THE ROUTINE CHECK FOR AN OVERRUN 
CONDITION AND IF SET 


TS: 
RMSGPT = ADDRESS OF RX BUFFER 
RMSCC = COUNT OF DATA TO BE RXED. 


; SUBORDINATE ROUTINES USED: 
; *LOGMSC"’ LOG MODEM STATUS CHANGE 
*“LGDVE"’ * = LOG DEVICE ERROR 


BGNSRV PRRXI 


R2,-(SP) sSAVE R2 
144740 011476 MOV @RXCSR,IRXCSR 3MOV RX CSR TO IMAGE 
000010 006574 #MOCHK ,PARAM Y MODE 


: BE PRIN21 
037112 #INOVR, IMFLAG 
BEQ 3NO NIG 
037112 ok aay, 3FIRST TIME HERE? 
PRIN21 


011476 ‘DATA SET CHANGE ? 

PRIN21 SIF DATA SET CHANGE IS NOT SET BR 
011476 MOV [MOV THE NEW MODEM STATUS IN 
1 760 ; 106760, CMODS CLEAR BITS NOT RELATING TO MODEM STATUS 
bose 144664 #TM, @TXCSR TEST MODE? 


—_ 
ase 
si 
Ne ~“ 
ANN 


000040 
11474 
7554 


*NO,BRANCH 
11474 [SET TM MODE IN CHANGE STATUS 
MOV S,TE 


beeeg 
006544 006542 sCOMPARE OLD TO CURRENT 
BEQ 10$ ZINC GLITCH COUNT 
HARD COUNT 


W= WWI = 
AUSAAIaS 
~ ANNNW 


SUF woe aie rw 


BR 
11520 108: MGLCNT sINC GLITCH COUNT 
166 1 006540 MOV #GLMSG,TEMP2  :SET UP GLITCH 

20334 PRIN1: JSR PC ,LOGASC *G0 LOG MODEM STATUS CHANGE 


~O 
SERRE EE 
ao 
GAvis 
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CVCLHC ae a con it NK MACY11 30A(1052) 23-MAR-82 16:43 PAGE 188 
CVCLHC.P11 RECEIVER PROTOCOL INTERRUPT ROUTINE 


011474 MOV CMODS ,MODS sMOVE CURRENT TO OLD 
33TEST FOR DATA 
002200 PRIN21: BIT MRSTARY!RDATRY,IRXCSR___;RX DONE OR STATUS AVAILABLE ? 
BNE 10$ 3 YES ,BRANCH 


SEQ 187 


045344 JMP PRINE ZEXI 
144546 10$: MOV ORD SR. IRDSR SSAVE A COPY OF STATUS & DATA .. 
004000 BIT WRXOVER, IRDSR OVERRUN ERROR ? 

BEQ PRI “NO, BRANCH 

s:1F AN OVERRUN THEN LOG ERROR. SET NAK AREASON TURN OFF RX & EXIT 

BIS #SNAK,PRSTAT — ;TE COBE ABOUT OVERRUN ERROR 

INCB  _—LOSTER [LOG LOCAL COAT ON ERROR 

BISB § #RXOVMSK,LSMASK :SET RX OVERRUN MASK BIT 

MOVB §§ #RXOVRUN.REANAK :SET REASON FOR SENDING NAK 

PRINS *GO0 TURN OFF RX AND EXIT 


3321F IN MULTI-POINT MODE AND NOT MY ADDRESS THEN JUST BUMP CHAR COUNT 


;STORE AWAY DATA 
BRING: at 2 peggy sSTORE THIS DATA ? 


H 
MOV RMSGP Y tSET RX MESSAGE POINTER 

MOVB oth (R2)+ [STORE DATA AWAY 

MOV R2,RMSGP + SAVE UPDATED MESSAGE POINTER 


::DECREMENT CHARACTER COUNT 
10s: DEC RMSGCC ZALL DATA RECEIVED ? 


PRINEX 3NO, H 

#BCC ,PRFLAG sCRC ALREADY CHECKED? 

PRI 3 YES BRANCH 

seneane IRDSR ore ch 

MBLCBAD, oPRSTAT ; ett’ MAIN CODE ABOUT CRC _ ERROR 
DISABLE INTERRUPTS AND EXIT 


PRING: 


_ [ Yeates CHARACTERS TO FLUSH CRC 
ue C,PRFLAG 3S 


gC T CRC ALREADY CHECKED FLAG 
V #2, RASGCC OUNT TWO CHARACTERS 
MOV #BCCU-RASGPT *ERC STORAGE ADDRESS 
BR EXIT 
BIS WECCOK.PRSTAT ;TELL MAIN CODE CRC HAS BEEN CHECKED 
CMPB —s- TRIBN, RHDADR zmY Y MESSAGE 
BEQ 5$ YES BRANCH 
BIC WMYDATA,PRSTAT :DON'T STORE IT 
BRANCH 


BR 
j SeLect BIT SET ? 
BIT #giT15, eRHDMCC =; SELECT_BIT SET? 


BEQ 3NO, 
037130 MOV #1,SELECT 3WE NOW HAVE THE RIGHT TO TRANSMIT,IF HALF-DUPL 


037134 7$: #RXM, PRFLAG :READ DATA MESSAGE ? 
BNE PRIN? NO, BRANCH 
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CVCLHC_DPV-11 DATA on i NK TEST MACY11 30A(1052) 23-MAR-82 16:43 PAGE 189 
CVCLHC.P11 22-MAR-82 RECEIVER PROTOCOL INTERRUPT ROUTINE 


;3SET UP_TO READ IN DATA PART OF MESSAGE 
900003 0 7046 BIC #BCCOK 'BCCBAD ,PRSTAT sCLEAR FLAGS (USED IN PROTOCOL CODE) 
00004 £136 BIS ARXM, PRELAG 7SET SSAGE READ FLAG 
600400 03/1 4 BIC #BCC.P RFLAG SEE ARS tAC CHECKED FLAG CUSED BY THIS ROUTINE) 
14 2660 BIC #BITIS'!B1T14, RHDACC : :CLEAR SELECT & QS B 
z21S ALLOCATED BUF BUFFER R SPACE LARGE ENOUGH FOR MESSAGE? 


WILL MESSAGE FIT IN MAX BUFFER SPACE 
BLE ios. YES. BRANCH 


s:MESSAGE TOO LONG !! LOG ERROR 
037074 INCB — _LBUFER 3LOG LOCAL BUFFER ERROR 
000002 037075 BISB § #MTLMSK,LBMASK :SET MESSAGE TOO LONG BIT 
000020 037064 MOVB §$ #MESLONG,REANAK :SET REASON FOR NAK 
000010 037046 BIS8 $#SNAK,PRSTAT | :SET SEND NAK FLAG 
aR PRINS STURN OFF RX & EXIT 


i IF A NEW BUFFER IS AVAILABLE 
SET BUFFER AND CHARACTER COUNT FOR MESSAGE 
037114 ‘ise Ist AND AXPRC 1s RX PROTOCOL DONE? 
037074 INCB _—sLBUF SLOCAL BUFFER ERROR 
BNE ZOVERF LOW 
R356. 
RASK 


ESET NAK REASON 
4 ta NAK FLAG’’ 


geee 
oaae 


002660 001000 


vin 
—o 
xy S 


RRRRF KF 


VMI 
N23 = 

NN 
Rowe 
wNNNN 


VMI 


SPEER RE RES 


sMESSAGE BUFFER_ADDRESS 
MO sCHARACTER COUNT OF MESSAGE 
MOV RHDMCC ,DVRCC STELL MAIN CODE HOW LARGE MESSAGE IS 
BR PRINEX EXIT 


04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 


SSSN SRRRSENES 


YIIIIII 


what at at 


t! aay  atale TE 
IN? B #QRX ,PRFLAG 3SET MESSAGE COMPLETE FLAG(USED BY MAIN CODE) 
#RXDPRSTAT SMESSAGE COMPLETE(USED BY PROTOCOL MODULE) 


PRIN 
037142 PRINS: CLR TURNON :RX NOT ON 
00012 BIC WRINTEN+RXENA,@RXCSR =: TURN OFF RECEIVER 


: MOV (SP)+,R2 sRESTORE R2 
ENDSRV 


WONAUSWN—O 


WS 


BABS 


L10022: 
RTI 


NOUS 





H 15 
CVCLHC_DPV-11 DATA COMM, LARK TEST MACY11 30A(1052) 23-MAR-82 16:43 PAGE 190 
CVCLHC.P11 22-MAR-82 11: RECEIVER PROTOCOL INTERRUPT ROUTINE 
-SBTTL PROTOCOL TRANSMIT ROUTINE 


:++ 
5 Pre DESCRIPTION: 
3 HIS ROUTINE oF USED TO SETUP EITHER CONTROL MESSAGES OR 
pare nESSAG ES FOR TRANSMISSION. 
IF THE SEND  Seanaaal IS SET AN "ACK MESSAGE WILL BE SETUP 
A "NAK® MESSAGE WILL BE SETUP 
- FLAGS ARE SET, A DATA MESSAGE WILL BE SETUP AND SENT. 


THE NETWORK IS HALF-DUPLEX THEN REQUEST TO SEND(RTS) WILL 
SERTED BEFORE TRANSMISSION. 


tthe 037132 TXPROT: PRSTAT,IMPRSTAT ;SAVE A COPY OF FLAGS 
100 006574 8 #PRORUN,PARAM ;PROTOCOL RUNNING ? 


$ 3NO,BRANCH 
000003 006566 CMP #ACT .MODTYP SACTIVE MODE? 


BNE 3NO, Cc 
037122 5$: TST TXREADY Z TRANSMITTER READY FOR MESSAGE ? 
BEQ 5$ 3NO,BRANCH 


s:IF HALF DUPLEX OR MULTI-POINT LINK, WE NEED THE SELECT BIT 
=*: BEFORE WE CAN SEND. 
3FULL DUPLEX AND PT TO PT ? 
9$ BRANCH 
SELECT 30K fO SEND ? 


YES BRANCH 
RXPROTO £00 WAIT ON SELECT BIT 
6$ sTRY AGAIN 


045350 
045356 
045364 
045366 
Be aete 
045376 
045402 


per] 


AMES 


RRRLLK 
FFFLEF 
RSanor® 


-: DETERMINE WHAT TO SEND 
83: TST FHDPLX :FULL DUPLEX? 


* YES BRANCH 
zs: IF HALF DUPLEX WE MUST DISABLE RX “BEFORE SENDING 
144010 BIC Mae EWIRXEHAS @RXCSR ; TURN OFF RX 


1 
CLR TURNON 3"RX_NOT ON’ 
37046 9S: 
265 
1 
7 


FLAG 
IMPRSTAT,PRSTAT :RESTORE ORIGINAL FLAGS 
TRIBN HDAADR [SET TRIB AD 

#PAD FLA 3THIS BIT USED IN TX INTER ROUTINE 

TXREADY © 

037046 
037046 
037046 


: TRANSMIT? 
HALE DUPLEX ITP MODE 
037046 


037046 


Peres fe 
Sernhe So 
ay $o 


NNN 


5 
~~ 


SELECT 
WSACK ,PRSTAT 
ASNAK ,PRSTAT 
#SSTART PRSTAT 

YES BRANCH 
#SSTACK,PRSTAT < SEN START ACKNOWLEDGE ? 

YES BRANCH 
BSDATA,PRSTAT 3 SEND DATA MESSAGE ? 
100$ YES BRANCH 

: FATAL ERROR 


@Boonw 
ea 


Duin SUSAN as 

NO a te | 
pS sot ot tt 
ba ad oad 
=—m—m— 


VMUIMIMIMIUI MA 
o 
eee 
=~ 





CVCLHC DPV=-11 DATA COMM LINK TEST 
CVCLHC.P11 82 11: 


aaa8 | 


z 


etn eeair eee een eeeet Cicer eran nner cr 


ee 


‘ 


aaa 
w Ww 
uw 

ms 


Wi 
Soo 
Aad as 
as 


Ww 
grees 
SOMES 
=O 
om— 


® RRLRRRLLLELLLELE 
Gavsssse | «BS 


SERPPEERE 


x 
nu 


SSRESNE 


Sins 
No 
Rees 


22-MAR- 


ageez3 
= 


—_ 
~ 
NNN 


ese 

VVVS 
wae 
es 
ae 
oOo 


OTe smut sts 
012737 000006 $ 
fares taney ett 
eae 

Bgcsg SHH ores 
OTe Se. se 
12737 7 646 
tare, ase et 


037120 20 


NNN 
Srson 
Syoe 

~ eA 
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MACY11 30A(1052) apa 16:43 PAGE 191 
PROTOCOL TRANSMIT ROUTI 


SEQ 190 


SETUP_TO we . ACK’ 


ibs: BIS XM, FLAG :SEND HEADER ONLY(USED IN TX INTER. ROUTINE) 
MOVB aENO- HOMID : CONTROL MESSAG 
MOV HDOMTYP ACK CONTROL MESSAGE 
BIS MBIT igtBlT16, HOMTYP :SET SELECT & QS FLAG 
TST HDXMTP HALF bUPL EX OR MULTI = POINT 
BEQ ?NO, BRANCH 
TST TXPRC SANY THING TO SENT ? 
BNE 208 


BIT #PRORUN, PARAM maha 
BIC #81T15,HDMTYP CLEAR SELECT BIT 
MO #1,SELECT HAVE 


V [WE HAVE SOMETHING TO SEND, SO KEEP THE LINE 
20$: MOVB  R,HDMREP 3SET RESPONSE NUMBER 
CLRB oid LLER 
BIC HSACK.PRSTAT | :CLEAR SEND ACK FLAG 
BR 200$ :60 SEND IT 
SETUP TO SEND A 'NAK’ 
bis: BIS ATXM, FLAG sTELL TX INTERRUPT TO SEND HEADER ONLY 
MO #ENQ,HDMID : CONTROL MESSAGE 


MOV #NAK HOATYP 
MO REANAK - HOM “REASON FOR NAK 
55$: BIS #B1T15! Brie. Ponies 3SET SELECT & QS FLAGS 
HDANUM FILL 
[LAST MESSAGE RECEIVED CORRECTLY 
END NAK FLAG 


MO 
BIC GENAR PRSTAT *CLEAR S 
BR 200$ :GO SEND IT 


SETUP TO SEND START MESSAGE 
bos: BIS #TXM, FLAG :TELL TX INT. ROUTINE TO SEND HEADER ONLY 
MOVB ENQ,HDMID : CONTROL MESSAGE 
MO #STRT HDMTYP T MESSAGE 
BIS mBITiSiBIT16, Moni sSET SELECT & QS FLAGS 
HDMREP :FILLER 
CLRB § HDMNUM SFILLER 
BIC #SSTART,PRSTAT SCLEAR SEND START FLAG 
BR 200$ :60 SEND IT 


; SETUP TO SEND SrAce MESSAGE 


70s: BIS #TXM,FLAG ;TELL TX INT. TO SEND HEADER ONLY 
MOVB NQ.Hi HDMID [CONTROL MESSA 
MOV ASTACK HOMTYP * START ACKNOWLED GE_MESSAGE 
BIS #B1T 3! BIT14,HDMTYP sSET SELECT 80S FLAGS 
CLRB =~ HDMREP :FILLER 
CLRB [FILLER 
MOV a1 SSTART HAS BEEN ACKNOWLEDGED 
BIC ASSTACK,PRSTAT *CLEAR SEND STACK FLAG 
BR 200$ 260 SEND IT 


CVCLHC_DPV-11 


CVCLHC.P11 


7840 


Eaparans 


sages 
900 


it ca eee. 


es 


BezeyeeseRnceeseeesssseses 


7 
pats 
106 
114 
1 
1 
1 
046140 
046144 
04615 
846160 
046166 


046174 


046202 
046210 


R 
x 
o 


04622 
046280 
046232 


36 
42 


2 
N 


Sa 
4 
&G 


ATA COMM. LINK 


104401 


22-MAR-82 11: 


037122 


037006 


7 041774 


TEST 





006566 


J 15 


MACY11 30A(1052) ap 16:43 PAGE 192 


PROTOCOL TRANSMIT ROUTI 


Duet TO SEND DATA 
BIC TXM, FLAG 


Ooze 
<S> 


:TELL TX INTERRUPT TO SEND HEADER + DATA 
MESSAGE 
CTERS COUN 
-SET SELECT ae LAGS 
LAST MESSAGE RECEIVED” CORRECTLY 
S MESSAGE NUMBER 


G0 SET REQUEST TO SEND 
STELL THE CTSSR SUBROUTINE TO SKIP DELAY 


SOH HDALD :DATA 
MOV TCC HDMCC 
BIS wBITiSiBITI6, nomic 
MOVB = R,, HDMREP 
MOVB Ait 
BR 260$ : 
GO SET "REQUEST TO SEND’ 
5608: JSR C,CTSSR 
#FIRST, IMFLAG 
SETUP To TRANSMIT HEADER PORTION OF MESSAGE 
5408: #HDMID ,MSGPTR ZHEADER MESSAGE AD 
#6 ,MSGCC HARACTER C 
MOV #20, SYNCC 
SEND THE DATA 
5458: BIS #TXENA!ATINTEN, @TXCSR 


TURN ON TRANSMITTER 


soIF active ts TURN ON TX AND GET OUT IN A HURRY 


33 NOTE: START 


217$: TST HDXMTP 


SEQUENCE OPERATES LIKE HALF-DUPLEX 


sFULL DUPLEX PT-PT 


BNE 20$ 3NO 
CMP #ACT ,MODTYP SACTIVE MODE ? 
BNE 220$ NO, BRANCH 
BR TXPREX : 
220$: BREAK 
TRAP  C$BRK 
TST TXREADY :TX FINISHED ? 
BEQ 220$ [NO, BRANCH 
F HALE DUPLEX OR MULTI-POINT REQUEST TO SEND WILL BE DROPPED 
550 PC, CLRRTS sDROP RTS IF HALF DUPLEX 
TXPREX: CALL —- RXON : TURN ON RX IF NECESSARY 
RETURN SWE ARE DONE ! 
EVEN 
ENDTST 
110017: 
TRAP  CSETST 





SEQ 191 


CVCLHC_DPV-11 


ATA COMM. LINK TEST 


CVCLHC.P11 22-MAR=82 11:09 
7895 

tar 

7898 

7899 

7900 

7901 

790 

790 

7904 

7905 

7906 

7907 46 

7908 046246 000030 
7909 046250 

7910 

7911 

791 

791 

7914 046250 

7915 046250 000130 
7916 046252 0463 
7917 046254 000001 
7918 

7919 

7920 

7921 

792 

792 

7924 046256 

7925 046256 001031 
7926 046260 046361 
7927 62 160000 
7928 64 177776 
980 046266 902031 
7931 0 bu6407 
ah 72 300 
793 74 776 
7935 Ou6276 006150 
jad 6442 
793 1 
7938 

7939 304 012024 
7940 

7941 130 
an 1 6466 
794 1 1 
7944 1 

7945 1° 006044 
ne 1 bee33e 
7949 15353 
7950 000001 
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MACY11 30A(1052) 23-MAR-82 16:43 PAGE 193 
HARDWARE PARAMETER CODING SECTION 


~SBTTL HARDWARE PARAMETER CODING SECTION 


SEQ 192 


st 

; THE HARDWARE PARAMETER CODING SECTION CONTAINS MACROS 

3 THAT ARE USED BY THE SUPERVISOR TO BUILD P-TABLES. 

; MACROS ARE NOT EX ECUTED AS MACHINE INSTRUCTIONS BUT ARE 
: INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. THE 
; MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 
: WITH THE OPERATOR. 


BGNHRD 
«WORD L10023-L$HARD/2 
LSHARD: : 
-SBTTL DEVICE INDEPENDENT SECTION 
CPRML DPLX,0.,1,YES 
-WORD TSCODE 
eWORD ODPLX 
-WORD 1 
-SBTTL DEVICE DEPENDENT SECTION 
GPRMA  CSRADR,2,0,160000,177776, YES 
eWORD TSCODE 
eWORD CSRADR 
-WORD TSLOLIM 
eWORD TSHILIM 
GPRMA  VECTOR,4,0,300,776.YES 
WORD 
-WORD VECTOR 
-WORD TSLOLIM 
eWORD TSHILIM 
GPRML RNODM,14,1,YES 
-WORD TSCODE 
eWORD RNODM 
eWORD 1 
XFERT ENDHWL 
-WORD TSCODE 
GPRML PTPMLP,10,1.YES 
eWORD TSCODE 
eWORD PTPMLP 
eWORD 1 
XFERF ENDHWL rscose 
GPRMD TRIBNQ,12,0,-1,1,255..YES 
eWORD TSCODE 
eWORD TRI 
eWORD -1 
eWORD TSLOLIM 





{ 
b 
H 
| 
| 
| 
| 
| 
| 
| 





CVCLHC DPV-11 


CVCLHC.P11 


7957 
7959 


846380 


046330 


046330 


ATA com yt aK TEST 


000377 


052506 


22-MAR-82 1 


046114 


042040 
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MACY11 30A(1052) 23-MAR=82 16:43 PAGE 194 
DEVICE DEPENDENT SECTION 


ENDHWL: ENDHRD 


»NLIST 


BEX 


sDEVICE INDEPENDENT QUESTIONS 
eASCIZ /FULL DUPLEX OPERATION : / 


DPLX: 


sDEVICE 


DEPENDENT QUESTION 


: .ASCI 


Z 


/DEVICE CSR ADDRESS : / 
/INTERRUPT VECTOR ADDRESS: / 
/R .? E "ITEP*':/ 


/1S THIS A MULTIPOINT ne 
/ADDRESS THIS STATION:/ 


L10023: 


«WORD 
~EVEN 


TSHILIM 





SEQ 193 








a ee ee ee oe oe oe oe oe oe oe oe oe oe ee oe Oe eee CE gee gee gee gee gee ee Ee ee , 


CVCLHC_DPV-11 


CVCLHC.P11 


04655 
04655 


046632 


046632 
046634 
046636 
046636 


ATA COMM. L NK TEST 


22=MAR-82 11: 


000030 


000001 
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MACY11 30A(1052) 23-MAR-82 16:43 PAGE 195 
DEVICE DEPENDENT SECTION 


3.SBTTL SOFTWARE PARAMETER CODING SECTION 

"THE SOFTWARE PARAMETER CODING SECTION CuNTAINS MACROS 
THAT ARE USED BY THE SUPERVISOR TO BUILL P=TABLES. THE 
MACROS ARE NOT EXECUTED T 
ee Mit BY THE SUPERVISOR AS DATA STRUCTURES. THE 


MACROS OW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS 
WITH THE OPERA RATOR. 


BGNSFT 


: ENDSFT 


SPATCH: 
-—BLKW 30 


LASTAD 


LSLAST:: 
E 


-EVEN 
WORD 





SEQ 194 


i, ee ee ee ee el ee ee ee 





CVCLHC_DPV-11 
CVCLHC.P11 


& 37055 
ABO. O= 090036 
ABORT = 0002 
wi) 1 





Tata Te 


914 
478 


Eeasee 


Sooooco 
NO 


SUSU SIPS IED 
w= Shs 


REF 


ee 


yey 
wes 


= JUIN 
Snug 


SESE 


M—MWSOo 
Dore 


FUP AAPA 
™ 


FUT 


NUMMUINAME WIN = OF NOW 


ae 
SYSSSVssssssss. 
PRN SSS RSS 


~ 
Sone 


=No—r 
MERA 
Ra 


PeUkSSSwT 
SSSeesees 


ges 


7 
4 
4 
7 
4 
; 
5 
5 
3 
5 
5 
5 
5 
3 
5 
3 
5 
5 
5 
5 
5 
; 


WEESEM ONS 
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MACY11_ 30A(1052) 23-MAR=82_ 16:43 PAGE 197 
CROSS REFERENCE TABLE -- USER SYMBOLS 


SEQ 195 


7329* 7398+ 

abe 

5254 5334 5585 6938 7234 7408 7748 7867 
51624 

5329 = 5331 53344 

3393 5335 5344 

523 2538 524 2593 52514 

5228 3=—s_: $230—s« 523 523 

5266 5269 5272 5276# 

5307, 5310 53144 





rit ea TOMMOOD 2 BZerKCe TO VMMOOWZZ 


CVCLHC_DPV-11 
CVCLHC.P11 


ACTRNF 


0 1370 
021276 
031 


ae 


ADANAAAAAAG 


ATA COMM. LINK TEST 
22-MAR=82 11:09 


AAPA 
Br Sssesse 
ZaSrsweuwe 


=i 
pa 


MoNonor 


(WIR) = SW “QNOVIWE & 


z PAA NEMA 


VVLNw’s 


WWW 


Nanas 
= 


WWF SHLHLHLHLSNVVOVW 
INE UAO—Ponony 


POPIPOPPDPOPONONININ S&S 
ee eB a ee eh dd 


Seeeeales 
NOD OO—r 


51294 


5148 


5605 


5491 


7835* 


82 
658 
7369 


2368 
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MACY11 30A(1052)_ 23-MAR-82_ 16:43 PAGE 198 
CROSS REFERENCE TABLE <= USER SYMBOLS 


55394 


$500 6427 7102S 7654 7662 
7667 = (76811 


3522 3593 6777 #6780 6800 


SEQ 196 





C 16 


SEQ 197 
CVCLHC_ DPV .1_DATA COMM. LINK TEST MACY11 30A(1052)__23-MAR-82 16:43 PAGE 199 
CVCLHC.P11 22-MAR=82 11:09 CROSS REFERENCE TABLE -- USER SYMBOLS 
BIT] = iat G 1454 21 52 2361 2369 3596 6778 6779 6801 
BIT10 = $000 G 1254 67 3 808 
BIT] = siete G 1244 $8 36 380 6809 
otis = 010000 G 1234 2 
BIT135 = 020000 G 1224 50 
BIT14 = 040000 G 1214 54 7495 7684 7791 7811 7822 7832 = 7844 
BIT15 = 100000 G 21204 2376 8 8=— 2377 $368 7495 7673 7884 7791 7798 7811 782202 7832 7844 
atte = 000004 G 1444 $556 $se7 53 2370 3599 6776 6802 
BITS = 000010 G 1434 $§ 254 2371 $803 
BIT4 = 000020 G 1424 Se $$2y 236 2372 = 6804 
BITS = 000040 G 1414 $§ 5 ¢1 35 $398 2363 496152 896153 = 6155 
BIT6 = 000100 G 1404 26 255 364 237 6805 
BIT? = 000200 G 1394 2227 $30 365 5380 5383 
BIT8 = 000400 G 1 2263 = 2374 $806 
BIT = Oo 1008 G 1374 § 65 2351 ec? 6059 6807 
X 02347 982 9864 
BLOBUF 023362 39644 4796 4803 4938 4980 5125 5392 
BLDB1 023372 9694 
DB2 023434 9774 = §=3984 
BLOBS § 023452 39804 3985 
000001 67804 7519 7704 
= 000400 G 21778 
BUFEX 014347 20198 4910 4951 
= 000010 676 7514 7705 
001000 21884 2572 2573 q37¢ 3922 3934 4054 4907 4948 5118 5388 
BYTBIT 006514 26074 3870 5157 161* 
C = 000002 22074 6029 
CBLLOP= 000045 23234 2921 
00645 25874 4066* 4074 4078% 4792* 4800 4978 4985" 5103+ 
CHECK = 00000. St td 852 
= 000001 2874 2790 4900 5059 
CLIACT 027736 4858 49974 
IALN= 7 2804 2898 
p> 2794 §=—2838 = 2848S 2903 
CLIBCR 012027 0184 16 
ot 011722 Bh 5339 
= $55 # 2787 2789 862791 2794 2805 2807 2809 2811 2813 2816 «=. 2818 
2833 835 2845 2853 2857 2859 = 2865. 28865 2868 2871 $858 2880 2882 
2926 34 44 2890 2892 2896 2899 2906 2908 2913 292 2922 = 2924 
CLIBRX 011702 018# 4310 
CLIDEC= 000011 $50 i $71 2930 
CLIERM 011605 01 1 4864 
CLIERR= 734 =—e79 2900 3464 
CLIEXI= 000001 of 779 et 2783 = 2785 2824 2826 2936 3446 3448 3450 3452 3457 
LINBG 011660 0184 i383 
CLINPS 011764 Dine 444 
INUF 011635 01 2 4873 
CLINUM= 000005 784 
CLIOCT= 19 814 $60 2842 = 3462 
CLIPW 0121 1 56 
CLIRAC 516 1 $60 
CLIRT 10. 1 4 
CLISEO 012074 0184 5186 


eee eee 
-—-4 


CVCLHC_DPV-11 DATA COMM, LINK TEST 
CVCLHC.P11 22-MAR=82 11: 


CLISPA= 000004 774# 777 $01 
CLISTR= 000012 834 78 ¢ 
10 81 81 
8 2870 
919 2921 2923 
CLITRE 907716 7734 §=4857 
ISPM 01157. 0184 4851 
CLISRP 011600 0184 729? 
LKBR 006622 6674 45 « 

CLKCSR Bpeee8 6664 205*  3226* 
CLKEN 6704 $8 4515* 
LKHZ 6694 0 3223 

CLKINT 017754 G 2034 289? 
KSET 017730 1584 4514 ¢ 
LKVEC 00662 26684 4505* 4535* 
CLRRTS 037 6125 6279 1 
CLRR1 037030 66534 54 
002 5094 403 
CMODS 011474 9634 6348*  6349« 
005150 5744 4052* 
CMPPTR 44 $2508 4060*  4061* 
090* 5091 5100* 
CMPSEX 033440 5675 57634 
SR 033164 5624 56744 
CMPS1 033324 57064 5724 
CMPS. 033330 57094 
033216 o6eu 5736 
CMPSS Oaares 573 
CMPSSA 033432 5726 57344 
$6 033374 5707 5711 57224 
CMPS7 033312 5695 57044 
CMPTOT 006446 5854 4069* 4072 
CMSGO = 000020 3024 879 
CMSG1 = 000021 3034 877 
CMSG2 = Oss 044 881 
CMSG3 = 0000. § Sa 883 
CMSG4 = 000024 3068 887 
CMSGS = 000025 3074 885 
= aig tyy 889 
CONOTP 0065 6254 106 
CONTIN 00655 6264 
006524 6154 3967 3971* 
437* aeSes 5487* 
CPTRR 006522 6144 414% 5440* 
687 3070" 5879* 
016534 184 3344 
CRC = siete 3184 
CRCB = 0000. § 


CSRADR 6361 
grace 0 
CTSSR b574 
CTSS3 0536644 


3 

5 

Yn 
a eS 
COCO Ww 
Boss 


a 
SSSS 
= 


ASrir 
“ 
See 
‘CO 

a 
as 
RAS 
fen 
So 


Be 


817 
$oe6 
925 


4081* 


4078 
6549 


31 
8 


879 
447 


4804* 


4079* 
65884 
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CROSS REFERENCE TABLE -- USER SY 


43 PAGE 200 
MBOLS 
839 344 444 
78 9 793 
82 83 834 
881 88 $083 
49 451 453 
4346" 4527*  4537* 
47 
4559 
7877 
6363 7609*  7610* 
4076* 4080*  4787* 
677 
4960* 4963  4982* 
me a. ur 
ag ih: HR. 
4084* 4782* 4947 
7850 


4671* 


7$13* 
4799 


5093 


4981 


5585" 


4958 


58 
4759 
7614 


4962* 


5097* 


4984* 


804 
856 
891 

60 


7624 
4976* 


5353 


5098 


4977 


5369 


4981* 


5417* 
5677* 


CVCLHC_DPV-11 salle COMM. LANK TEST 
22-MAR-82 11: 


CVCLHC.P11 
CTSS4 036622 6597" 6601 
cTss7 0 6605 6609 
CURADD 006526 61 369 
CURCC 006520 1 931 
342 52378 
csau = 000052 1945" 2939 
CSAUTO= 5 19438 4660 
CSBRK = 000022 19484 6003 
C$BSEG= 000004 19454 
SUB= 000002 19458 
CSCEFG= 00004 19458 
Lck= 000062 1945" 4510 
LEA= 00001 19458 4696 
CSCLOS= 00003 19458 
LPi= 000006 19458 
C$CVEC= 000036 19458 
SDCLN= 000044 19454 4478 
000051 19454 
CSDRPT= 000026 19454 
000053 1943# 4717 
CSEDIT= 000003 1948" 3009 
CSERDF= 000055 19458 
CSERHR= 000056 19458 
CSERRO= 19454 
CSERSF= 000054 19458 
CSERSO= 000057 1945 5698 
CSESCA= 000010 19458 
CSESEG= 000005 19454 
CSESUB= 000003 19454 
Tst= 000001 19454 7890 
CSEXIT= 000032 19454 4636 
CSGETB= 000026 19458 
CSCETW= 000097 19458 
000043 19454 3401 
CSGPHR= 000042 19454 457% 
CSGPLO= 000030 19454 
CSGPRI= 000040 19454 
CSINIT= 000011 19658 4644 
CSINLP= 000020 19454 
CSMANI= 000050 1945¢ 4831 
CSET ee boos 134% 3035 
= 
Sts Mele st 19434 
CSPNTB= 000014 19454 3031 
CSPNTF= 000017 19434 3347 
4356 4556 
6319 33 
CSPNTS= 000016 15458 3536 
$766, 5781 
CSPNTX= 000015 19458 
c$ai0 = 000377 19458 
: ? 19454 453 
CSREFG= ? 19454 448 
CSRESE= 000033 19438 4686 
CSREVI= 3 19454 2 


MACY11_30A(1052)_ 23=MAR=82_ 16:43 


E 16 
PAGE 201 


CROSS REFERENCE TABLE == USER SYMBOLS 


933 
5239* 


6057 


4520 


66144 
$376. 
5388* 


6095 


5729 


4837 


4847 


3957" 


6259 


5772 


4897 


5857 


4794* 4800* 4936+ 
3970 (397 3986 
6559 6599 6617 
6014 6051 6118 
3096 =s_« 3116 

092 112 

431 491 3550 
4876 4914 49 
5924 ey 7289 
3657 66 3674 
4131 416 


4941 4978* 
4790* 4802+ 
7137 = 7872 
6271 6393 
3868 3879 
4955 = 4971 
3687 8§=©. 3700 


6418 


3887 
5071 


3708 


6631 


3931 
5144 


3735 


7452 


4313 
5189 


3751 





SEQ 199 


CVCLHC_DPV-11_ DATA COMM. LINK TEST 


CVCLHC.P11 22-MAR-82 11 


CSRFLA= Sones 
CSSEFG= 6 


DLE = 00002 
DLL 033566 
DLLCM Onis 
DLLMOD= 


= 00003 
000053 
DMPQ = 000054 
DMPS = 000052 
DMSGAD 002172 
DMSGCT 002150 
DOW = 
DPLX 0463 
DPV = 
DPVP1 01147 


DSITEN= 000040 
001 


:09 
19454 


£EeSE 


z 


Be 


NIPIMIMPIA ARINPININININIOA 

ANNAN MWNnN 
VIN at 
Seeee 


=n 
ee 


O# 


Oooo 


“eSeeeeees 


et ee 


seven 


F 16 
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4889 


6033 


5383* 
6545 


oa 
So 


SLPS. 
WOON 


2 


4629 
7510 
5351 
4895* 


7264* 


5158 


7464 


7446 


6133 


4821 6907 


5436 8 8=— 5581 5630 5674 


Tesgs 7374% 7376* 

7509* 

3714% 4112 4824% 5149% 
g0138 4115 4825* 5150* 
4144 4149 4153 4827* 


7472 


7454 


6093 6105 61254 


5851 


5152* 


5919 





SE@ 200 


G 16 
CVCLHC DPV-11 rn com Lim TEST MACY11 30A(1052) 23-MAR-82 ¥ 43 PAGE 203 
11:09 


CVCLHC.P11 CROSS REFERENCE TABLE == USER SYMBOLS 
dvI ree 60 60374 
ws guts EYE, 
dvI 654 e3 
ce ee ie 
vt 7 554 a 6080 60614 
DVINS9 5 60564 
dvI 654 608 
ae a sas ee 
DVINBI 6 $080 6078 6098 6105 61124 
DVIND 034674 st Fi 6107 
DVMEX 035156 $) 615 
DVMODS O31¢8 32 1514 6607 
DVRCC 2 5974 5546* 557 5928* 5943 5945 5946* 6190*  6430* 
DVRCT 74 5 5415* 5488*  5583* 5587* 5607* 5608 5678* 5735* 
DVREX 035266 6182 91" 
DVRXA 70 25964 5544" 5573. 5926* 5942 5945 6188 6428 7709 
DVRXI 035554 G 4619 481 63394 
DVRXQ 035166 5551 593 61804 
DVRX2 035244 6186 61954 
DVRX 5260 6191 61974 
DVTCC 006456 Store 5558* 5615 5876* 5890 6245 6251 6502 7843 
DVTCT 60 5914 =5438* 5461% 5486" 5617* 5622 5625 
DVTREX 035552 6281 6287 62924 
DVTR1 35344 6242 4 
035374 6246 62534 
DVTRS 035410 6238 62564 6275 
DVTR4 035516 6278 62834 
DVTRS 37044 6651 66574 
DVTR8 035416 62584 $688 6290 
25894 i 5614 5873* 5889 6244 6501 
DVTXI 036254 G 4626 $67 # 
DVTXRX 035270 5569 5939 62374 
DVTXR1 037 6619 66364 
DVTXR2 036720 66164 6621 
DVTXR 65944 5 
DVTX eth: 6590 6 7a 
ECHO = 000037 sare 58 
ECHOS = Cr 84144 5276 5286 5296 5576 
EDABO § 015452 6 184 
EDDCK 1363 721 \” 
E 15357 724 1 5718 5731 
EDDER 813952 719 184 
EDDLE 015522 723 0184 5700 
EDDVI O13473 7 ! 1 
EDEOP § 015412 7 1 
E 15426 7. 4 
EDRXC 15201 71 1 
EDRXQ 15154 71 01 
EDTXC 15125 71 1 
EDTX@ § 015101 71 1 
FM11 14701 184 5 
EFM15 120 \s 069 
FM2 4604 1 041 


7711 





SEQ 201 


CVCLHC 
CVCLHC.P11 
EF .CON= G 
EF .NEW= G 
EF .PWR= G 
EFSTA= Q00040 & 
EMSGO O05 13 
EMSG1 00221 
EMS 00221 
EMS 002 $s 
EMSG4 002 
EMSGS on 41 
EMSG6 51 
EMSG8 00264 
ENDEVT 02 °c 
E 0463 
ENDIT pegite 
ENDPS 053500 
ENDQO = 000017 
ENQ = 000005 
EOP = 000024 
ERRCNT 006506 
ERREXT 044502 
ERRPRC 04372 

RR1 017462 G 
RR10 017552 G 
ERR13 017634 G 
ERR14 017666 G 
ERR2 017524 G 
ERR4 017602 G 
ERX = 000100 
ETX = 000200 
EvL_ = 000004 G 
EVMCTS 016477 
EVMDCD 016507 
EVMDSR 016503 
EVMOCG 016357 
EVMOHD 01640 
EVMOST 01 
EVMRI 01651 
EVMRTS 01651 
EVMSQD 1636 
EVMTM 165, 
EVTADD 765 
EVTBCT 765, 
EVTEND 00755 
EVTFO 01554 
EVTF1 12653 
EVTF 1567 
EVIF 15744 
EVTF3C 13796 
EVTF3D 015 
EVTF4 16015 
EVTF4A 016117 
EVTF 16215 


een COMM. LINK TEST 


“MAR-82 11 





eee at me eh ed ed eh ee ed 


1534 449 
1544 449 
1554 
1524 4487 
1514 $686 
93 4178 
94 4194 
2336 <3 
aC 
98 4514 
399 4654 
401 4 
oe et ue" 
7939 3672 3255 
4496 4604 46064 
5766 5 
23014 $893 
67864 147 7200 
22464 3313 
26044 3323 3326 
6269% 6391% 6416 
7458 7477 7502 
7142 7156 7162 
hd 5719 
30514 5701 : 
0854 6017 6054 
1044 
0384 3732 
0654 577. 
22554 5416 5464 
$5508 5439 5490 
1714 
2704 0184 
706 0184 
705 0184 
0184 786 
0184 806 
0184 26 
708 184 
707 pine 
709 1 
ae 0184 
7 eee 83 
7348 * 682 
34 $8 646 
84 
84 71 
8e 84 
97 37 
“9 70 
09 
4 
84 
8a 2 


37964 


7808 


5375* 
7450* 


731 
730 


H 16 
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7830 
5714* 
7538 
7309 


6421 


5930 
5896 


747 
746 


5727* 


7547 
7356 


6634 


6280 
6286 


5770* 5800  6012* 6049+ 
7553 =7558 7562 75664 
7364 7378 = 74384 

7455 7473 

762 

36) 





SEQ 202 


6116* 





I 16 
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SEQ 203 


EVTFSA 016274 018# 30 
EVTLOG 806638 $3) 3 # 3372 3631 3644 4560 
un Bit Sie 
EVTPT 8 58 sre 3630 8 8=—. 3651 4561* 
eee nce Sr ss 
EVTTMP 007654 7354 See 3727" 3729 3743% 383745 4 8=3758* §=—3760 = 5775" = 577 
EXIT = 57 ae 84 4675 4893 5078 
EXITCL 026314 4676 46854 
ESEND = 0021 19454 
ESLOAD= 3 19454 3036 
FACSIM 023506 40484 $30 
HDPLX 006572 64eH 45798 606% 6604 6650 6910 6988 7238 7763 
FIR 037250 508*  3514* 528* 3553 8604 
FIRST = 004 22694 g 94 6602 7605 851 
6534 5372e 5416 5439" 5464% 5490* 5540 555 5571 5603*  5604* 5610* 5612 
620" 5621% 5629% 5878"  5884* 5896 5930* 6022* 6072+  6086* 6092  6126* 6127s 
618) 6184* 6187* 6237 6239% 6243" 6277 6280 6283 6286 6289 6344 6382 
6400" 6424  6426% 6427% 6433* 6485 6489 6498  6500* 6504s 539* 6550* 6562 
6565 65 6602+ 6893 7062* 7770% 7788% 7807* 7819%  7829%  7841* 
FMTMSK= 000002 67784 7546 
FORMER= 000021 67714 7308 7541 
FSAU_ = 000015 19454 4727 4738 
FSAUTO= 000020 19454 4655 4659 
= 000040 19454 1947 3021 3038 83051 3065 3085 3104 3121 3203 4435 4455 4471 
4655 4669 4688 4705 4711 4727 4733 4754 4837 = 4897, 6339 647 
7598 7889 7908 7993 
FSCLEA= 000007 1945#@ 4669 4695 
FSDU_ = 000016 19454 4705 4716 
FSEND = 000041 19454 1947 303 3049 3063 3077, 33097, '—s«s3117)ss 3119 3230 4447 = 4636 = 4645 
$661 4688 469 4709 4718 = 47311 4740 4754 4837 = 4897) Ss 6441 6510 7725 
7889 8 §7891 7955 
= 000004 19454 8 7939 
= 000013 19454 2072 219 
FSINIT= 44's 19454 4471 464 
FSJMP = 00005 19454 3119 463 
= 000000 19454 1947 7? 
FSMSG = 000011 19454 3021 30. 
FSPROT= 000021 1945# 4455 4462 
FSPWR = 000017 19454 
FSRPT = 00001 19454 4435 4445 
FSSEG = 00000 19454 
FSSOF T= asia 19454 
FSSRV = 10 19454 3203 3228 
FSSUB = 000002 19454 
FSSW_ = 000014 19454 
FSTEST= 000001 19454 4755 889 
GETCL 026762 483 48444 9 
GETPRM 02571 4302 1368 3 , 
GETRCL 266 33964 398 3433 
ctMsG 166 1 ; e361 7622 
GLOBCC 037063 O24 7193 
GOOD b06584 6274 3026 865712 





J 16 
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CVCLHC.P11 22-MAR~82 11:09 CROSS REFERENCE TABLE -- USER SYMBOLS 
GT 02634 47628 
GT 02641 476 47758 
GTRA4 8 2218 47804 
TRAS 664 4776 48164 5567 5809 5829 
GTREX 8 036 3728 
GTRX2 32140 3884 5807 5898 5958 
GTRI =—«-_-« 31734 rs 784 4888 53494 
TXRXB 026346 47614 
GSCNTO= 000 19454 
GSDELM= 00037 19454 
ISP= 00000 19454 
GSEXCP= 0004 19454 
GSHILI= 000002 19454 
GSLOLI= 000001 19454 
G$NO_ = 000000 19454 $208 4850 5860 
GSOF F S= 19454 04 454 4850 5860 7915 7925 7930 7935 7941 
GSOFSI= 000376 19454 3404 454 4850 5860 7915 7925 7930 7935 7941 
19454 7925 7930 
GSPRMD= 000002 19454 Fake: 454 4850 5860 7947 
= 19454 7915 793 7941 
GSRADA= 000140 af 74 3404 4850 5860 
= 000040 19454 436¢ 7947 
GSRADL= 000120 19454 791 7935 7941 
000020 19454 7925 7930 
GSXFER= 19454 7939 7945 
GSYES = 000010 19454 4542 7915 7925 7930 7935 7941 7947 
002652 24934 7769* 
HDMC 002654 4964 6089 6196 6252 6542 6552 7105 
HDACC 2 4908 6075*  6087*  6100* 114 251* 7448 7843* 7844 
HDMID 00264 24884 7789% 7808*  7820* 7830* 7842* 7854 
HDMNUM 002651 4928 §7801* 7812%  7824%  7834% 7846 
HDMREP 002650 4918 7800* 7813  7823*  7833*  7845* 
HDMSG 2 24874 6071* 6088 § 49e $630 551 
HDMTYP 002 24894 8 7790% 77918 98 3oee 810* 7811*  7821* 7822  7831* 
XMTP 037136 67564 6909 gos 934 7225 406 7755 7792 786 
HEADBC= 67654 7170 177 496 7501 
HELP = 1 1945 1959 = 205 2066 207 2104 2108 382115 2976 
3130 = 4437 4441 44% 4y 447 4639 4657 4671 4691 
4734 4751 4752 = 4756 7885 789 7911 7959 = - 7973 7978 
HELPDC= 000000 1# 81961 085 2103 = 2231 $63 344 $328 2937 = 2977 
3317 36 7 773 4581 4617 21 963 968 6133 6161 
644 920 56 
= 000005 34h 7 2780 = 4882 5075 
HLPEND 0030 22h = 507. 
HLPF oes 1 88 5068 
HLPTAB 00 1 $3130 5 
HLPO 1221 018# 4811 
HLP1 1 514 Hy 
HLP, 1231 515 1 
HLP 1 rt 216 01 
HLPSA 1251 51 01 
1 234 218 1 
HLP4A 1 3 51 184 
HLPS) =—s-—« 012677 359 184 
HLP6 =: 012767 521 184 


7947 


7947 


7832 


2999 
4707 
7986 
299 
620 


SEQ 204 


3018 
4729 


3079 
6301 


CVCLHC_DPV-11_ DATA COMM. LaNK TEST 


CVCLHC.P11 22-MAR-82 11: 
HOE =1 at ed 
HRDMSG 0167 0184 
HSMSE 002653 4944 
IBE = 01 G 1814 
IDbU = G 17484 
IER = 02 G 1824 
IMFLAG 03711 67464 
IMPRST 03713 67544 
ININT = 22514 
INIT? 025 as 4475 
INMASK 0370 7178 
002 2674 
INTPRI 011470 9524 
011 9504 

IRD 011500 9654 
IRXCSR 011476 9644 

7609 
ISR = 000100 G fe 
IXE = 004000 G 1804 
ISAU = 000041 19454 
ISAUTO= 000041 19454 
ISCLN = 000041 19454 
1SDU = 000041 19454 
ISHRD = 000041 79084 
ISINIT= 000041 19454 
ISMOD = 000041 19454 
ISMSG = 000041 19454 
ISPROT= 000040 19454 
ISPTAB= 000041 19454 
ISPWR = 000041 19454 
ISRPT = 000041 19454 
ISSEG = 000041 19454 
ISSETU= 000041 19454 
ISSRV = 000041 19454 
I1$SUB = 000041 19454 
ISTST = 000041 19454 
JSJMP = 000167 19454 
KEYWD1 003010 25104 

4900 

5171* 
LAST 03724 3509* 
LBMASK 03707 67234 
LBUFER 037074 7228 
LCLKEN= 144 
LGDVE 020160 854 
Hex oH 
LISCKA 578 $36 
LI 3124 
LISP 1404 alee 
LMDL r* ‘4 
LNCNT 14 
LOE = G iS 
LOGCMD 020 074 
LOGCML 





6358 


MACY11 30A(1052)_ 23-MAR=82_ 16:43 


K 16 


PAGE 207 
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7619 


3350* 


6990 


6905 


30494 


64414 
78894 


3504* 
5062* 


68594 


6268 


5378* 


7006 


6413 
6348 


30514 


64774 
78914 


4473* 
5075* 


6390 





7025 7030 
7631* 7632 
6367 6370 
30634 30654 
65104 75984 


7062 


6588 


30774 


77254 


7603 


7656 
6407 


30854 





SEQ 205 
7605 7851* 
6414 7600* 7607 
3097# 31044 31174 








CVCLHC DPV-11 
CVCLHC.P11 


0 
0 
0 
0 
0 
0 
0 
0 
0 
0 


L 
LSICP 
LSINIT 


oO 
w= 
—’ 


esseesesss 
Go WISSOSSSSSS 
PN SSS ae 
GURAROUOSORROR 


ososcssescsc 
ve 
“J 
w 





AA 
rs 
ooo 


ue 


lal 


MIWA 
AMM! 


WINN 


NW 


VINA NOVI 
MUI = IS 


S33 
wee 


20394 


ATA COMM. LINK TEST 
22-MAR=82 11:09 


eeeere 9 


NU 
WwW 
So 
co 
= 





L 16 
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280 3284 33234 

3302 333062033310 331. 3320 33324 
33574 4683 

5891 


5877 
4568* 4569 4573 


7637* 


79098 


20734 





CVCLHC 
CVCLHC.P11 
LSLADP 6G 
LSLAST G 
LSLOAD 100 G 
LSLUN 74 G 
LSMREV G 
LSNAME G 
LSPRIO G 
LSPROT G 
LSPRT G 
LSREPP 00 G 
LSREV 3 G 
LSRPT G 
LSSPC O06038 G 
LSSPCP 002020 G 
LSSPTP 00 v4 G 
LSSTA oa 050 G 
LSTEST 114 G 
LSTIML oo 14 G 
LSUNIT lé G 
L10000 00215 
L10001 at 266 
11000, +7550 
L1000 017809 
L10004 01763 
L10005 017664 
L10006 017722 
L10007 020074 
L10010 025340 
Lis Osoees 
L1001 OSes 
L10014 0 335 
L10015 026 
L1001 Boea7? 
11001 4g 

10020 930525 

10021 He 
L100 § 346 
Li 
RAINE = ae 
RESDAT 
mGLCNT is 
~— 11 B 
MOBITE 007356 
MOBITS 
MOCHK = ee 
MODE 
MODES 10 
MODLOC= 
MODREM= 
MODS 


19894 


—nonrn— 
SRS 
— 
waa 


SPSResssosES 
GSH 


19774 
207 


eet A ATA a LENK TEST 


79914 


8 1 
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78594 


593 3596 )3=— «3599s: 3610 


* 3765 5776* 63608 7621* 
5377« 765 5777* g & rgi8s 
anne" 4825 4839* 150 5259* 5278 
60 6029 6588 


6151* 6152% 6155* 6156* 6354  6363* 


SEQ 207 


5332* 


CVCLHC DPV=11 DATA C LINK TEST 
2 AMARCB? i mt) 


CVCLHC.P11 
|moDTYP 006566 
MOMSGS 007574 
MOP 


—_ 
ee rete 
Seyi psyees 


MS 00222 
00 
00 
1 





223 
24 





$8 : 


6912 


$375" 
6250* 
4952 


4801* 


5121 


7356s 


5284 


c 1 
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3585. 


S38 385% | 35575 | 088 


6495* 6502* 6552%  7855* 
4 4964 
649 6494% 6501* 6551* 


5120* 5199%  5223* 5225 


5234 


7338 867645 7670 


5315 


2558" 


7854* 


5227* 


SEQ 208 


780 70a 798° 7867 


5229 


5231* 


5233* 


5236* 


SEQ 209 
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-MAR- 


CVCLHC ‘thee CO tage TEST 


CVCLHC.P11 


ganan RIAAMSASH KAMA STO 
SOD RRRRRARO ‘s 












SAUCE RESIS ESSRRA ST SELENE SS RNN NTIS Ca EGU SES RNS 


Peo lolol ele dd et ed eh ee ee errr reen 


SOSOSSOSOOSOOOOSOOSSOSSSSSSOSSSSSOSO 


SLE SOON LENA RMAs SSIs Te STARA ROD OTOSOSON 


ed, sek eek seh seh ee ech seh, eh seh eh eh seh seh eh Teed mel mak oh muah ouah ouah muah sah sath sua meh Sued sth, eh, Suh, Sth, eh, eh, seh, Sth eth, Sth th th St a Sal Sh 





~~ 
- 
~ 
uw 
2 
aw 
—_ 
mp 
wT 
co > 
wow 
- 
a 
uy 
Patt) 
o> 
=! 
=! 
ral 
~ 


MACY11_30A(1052) 
CROSS REFERENCE TABL 


RAGASSISRSTAIIS SSISTSRASRIESAAIIZY 


Pam oe oy fe ty 4 QO GOR. 00 GD GO 60 69. 0. G0 GOR. 09.00.60 00 


22-MAR-82 11: 


lS ee TINK ORR & UNO K UCN - wr 4 = WAS ON 
FISOOSOSN SSSKr KKK KK Or eK NNNNNE SSS SON SOO SSO SOR OOOSOOOONOSSS 


NIMs 


Soa gensecesegesenecceuceeas 


eNUMTNOK. 


ttt at att atte 
PEEEEEEEEE 


unm 


$3 


CVCLHC_DPV-11 BATA COMM LINK TEST 


CVCLHC.P11 





F 1 
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OOARARSBS itds L 


CVCLHC.P11 CROSS REFERENCE TABLE <= USER SYMBOLS 
NODS4 0104 14 
me H 
ey es 
NOD60 0104 8 8 34 
NOD61 1050, : 
mee He 

1051 8404 
NOD64 919318 8414 
NOD65 192 Hi 
—s 105, 
NOD6 105 8444 
NOD? 77 7844 
NOD70 §=©.0105 8454 
NOD71 01054 8484 
NOD 810288 8494 
NOD 01055 8504 
a an 
NOD7 Ay se sese 
NOD 10610 2203 
NONE S : 
NOTNUF pore 264 2788 791 79 1 
a oor 50 ater ocse 2 2792 = 2802s 284 2843 92849 = 2904 
NULL = 000000 22864 

= 000014 22984 2912 
N10$ 443 (77h 
N100$ ats 791 2794 828214 
N102$ 010356 Sse" 
i i 
N111$ 010434 sesie 
N112$ 010456 283 28334 
NIiSS b108e3 2809 = 2811 3813 2816 «62818 §=—6 28474 §=—2853) 0 2857 =—s 2859 = 2863 
924 92 931 : 

N116$ 010564 $0 , ’ , : 
N117$ 01061 28554 
mie Hs 
N1 10756 8734 
nigis ae 882 2884 2886 2888 2890 2896  2902# 2913 
NI 11450 845 2849 2892 2904 29354 
mee Hse ‘ee 
N1 10736 

0716 





Sewesesseeke 
SooooooooeoeeS 


ee aD nat eb th eB tt 
eed cea wed en nt et 


ne 
RS 


2222222 
ceed ed eh hd od od 


2868 


SEQ 211 


CVCLHC_DPV-11_ DATA 
CVCLHC.P11 22-MAR 


1 
Bi0t03 

101 
010040 
007730 
G0 764 
0 0030 


WI 
_ 


BRAS 


aot aotad 
RSERR 


ed ed ed ad ed ed ed ed ed ed ed I OH OOO 
par er or FETT 
NVaS FE 
Aarnoo 


=] 
Fuss 


eed cee eee ed cee ced ceed ed eed ed eed eed od ed eed ed ot od od 


ooooo 
Mn 


0 
; 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
at 


car age es 


SSSeeeley 


SEFERLEREGAUS 


—~ 
™ 
a 
= 


G 1 
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7964 
864 


5705* 
5209 
5871* 


5373* 


7510* 
4598* 


3017 


2025 


38 


62 


801 
870 


a 


5859 
5876 


5867 5873. «5874 =: 5892 


6122*  7456* 


6504 6550 7770 


336 


5894 


831 
925 


5926 


3929 


5927 


3950 


5953 


SEQ 212 





H 1 


SEQ 213 
CVCLHC een coe tag TEST MACY11 30A(1052)_ 23-MAR=82 16:43 PAGE 215 


CVCLHC.P11 CROSS REFERENCE TABLE =~ USER SYMBOLS 
PARAM 006574 38 (32 35 3544 4B80B* «= 4823" «4827515 276% 5286* 5296 5314e 53178 
Ste ty LE 5346 Bt $37 4837 5138 garGe BeBe 385 $519e 5934 
654 a8 69 106 7307 «=o 7219-=Ss«7321® «= 7349-«S««7275.—=S« 7289" «73018 «= 7384 
ra} 601 7746 «7796 
PAS = 00000 57 5287 5601568 
PASC = 00004 $50 
= 
PCADD. poeseO 
PCK 14005 4139 
PCLKCT= 001600 4526 
LKEN= 000111 45 
PCPA” 14647 | 
PCSAR 011454 4587* 4588"  6061* 
PEC 014015 4143 
PLCK 032300 54608 
PLCK2 032300 
PLCKS 039314 
014024 4152 
PucK 914003 414 
¢ 014013 4146 
PNMS 01402 415 
01408 4131 
PNST 013773 4138 
T = 001000 G 
014034 4148 
PRFLAG_ 057154 7102* 7149" 7656  7662* 7677 7682% 7683" 7715 
3 ) 
ipa 028 6865 6846 6867 6868 6849 6850 ; 
PRIBS 021724 G85] $852 855854, 68556856 } 
PRINEX 045366 653.766 12 77218 
INT 044656 762 } 
PRIN2 044604 76148 | 
PRIND1 044670 7604 7606 7608  7628# ' 
ING 952 76458 
aS hr vis 34 P6678 
a i a EAGT Pebee ose 
INB 0453 7659 7695 «77188 
PRIW 02166 6842 6843 68446857 
PRIOO = 000000 G 263 
PRIO1 = 000040 G 1 
PRIO2 = 000100 & 
Pri = 600200 & 4618 4625 4817 6903 
= 
pate = OoroeO & 
PRIOG = 900500 & 
PRIO? = 000340 G 1 4673 
PRNT. = 00005 782 488% 5081 
PROE 1 0 . 
PROF DX 15. 70254 
PROHOX 0413 69874 
PROINT 041 oF 
100 4823. 6898 6928 7207 7219 7221 7269 7275 «7301 «7384 7391 7440 
PROTEX 041670 $ 6982 7008 7021 7056# 
PROTO = 1 86 





CVCLHC 


CVCLHC.P11 


Toe 9¢0702 
0 

4504 G 
37046 


PROTOC 
PRRXI 
PRSTAT 


RESTRT 





DPV-11 
22-MAR-82 


ATA COMM 


athe TEST 


ie 
(8 


MACY11 30A(1052) 


I 1 
235-MAR=82 16:43 


CROSS REFERENCE TABLE == USER SYMBOLS 


Re 


=n 
SS 


TY eet 
+44 

en) 

WUWo= 


WNEOSAN nN 
Cony: ow 


531 
689. 


4775 
4548 


5549 


45578 


5562 


7705* 


5882 


7716* 


5113 


4264 
4870 


$358 
5321 
4346 


ee a] 
n=O 
MOO 


$35 
281* 
7813 


7810 


PAGE 216 


5934 


rOI3s 
ree 


5365 


4315* 
5056* 
4331* 


4358 
5086* 
4333 


4844% 
5094s 
4334* 


5930 
5896 
5315 


727P8 


1778 


4861 
5108* 
4336* 


6181 
6086 
5318* 


7103 
99 


re 3ee 
977 


5191* 
5163* 
4340+ 


6184 


SEQ 214 


5245* 
5251* 
4342* 


6283 
6237 





J 1 


SEQ 215 
CVCLHC_DPV-11 par - LaNK TEST MACY11 30A(1052)_ 23-MAR-82_ 16:43 PAGE 217 
CVCLHC.P11 2 “82 11: CROSS REFERENCE TABLE == USER SYMBOLS 
RHDADR 664 5 7181) 7 
RHDMCC $0660 33018 6080 Hi 6104 6106 6113 6429 6430 7447 7673 7684* 7687 7710 
RHDMID 002657 2499" 71046 7138 7147 7200 
RHDMSG 8 65 4984 $123 $331 7101* 
66 5034 36 5 

00 S02e 7. ‘ 7231 7325 7394 
RHDTYP 00 re) z 3 7217 7245s 7273s 7297) 7495" §=—7496 = 7505 7514 7523 7532 7541 
RHLPEN 003052 5308 9 : 
RHLPTB 003036 5248 85 
RHLPO 01 oiee its 
RHLP1 013124 4 01 
a 013146 525 bias 
RHLPS 01 oot 2326 184 

01 256 0184 
RHLPS 013264 528 184 
RHLP6 013527 44 via 
RI = 040000 3544 269 
RINTEN= 000100 3644 308 6197 6435 6545 7108 7110 7719 7766 

OP= 000047 S254 292 

037101 7334 = 7528% §7546* 

C 011514 714 6189 6196* 6380" 6401* 6429" 6542* 7105* 7652*  7663* 7710 
RMSGPT 011512 704 $1 * 6195* $373 6377* 6402* 6428% 6541% 7104* 7647 7649%  7664%  7709* 
RMSTER 037100 67324 7525 sg," 543* 7545* 

011524 11h ad 4600* 5381 6062 6185 6241 
046442 36. = 795 
TNF= 000006 23414 $33 3455 3460 
RPASS 006576 S52 63295 = 4807" «= 4826 4834 = 5087" = 151 5321* 5803 5805* 
RPERR = 000004 tt 5 
RPEXT = aia 3378 3 3449 3499 
RPFUL = 00000 S404 345 
= 000001 athe 4 3447-3495 
RPLOG = 000003 3 51 3504 
= 000007 3428 gs 
RPT Ose lse it 3710 §8=—.: 3721 3738 §=6.:3753 «3769 =: 3793 
RPTAA oest & 56a 
8s 0 75 reas 
KPTDC 74 64 
T 022564 ae 7418 
RPTDER 022350 74 928 
RPTOLE 022640 747 7554 
RPTDSP 007656 7398 7 
RPTDVI &aG 744 124 
TEOP 510 749 7254 
RPTMS 2 aie hy 78 3792 8©=—. 3805 # 
RPTMSC $ 714 es 775a 
RPTNV. 013421 oe 547 
RPTTXQ 276 oe 4d 4: 36784 
RPTO 170 6554 
RSTARY 00 on 6407 7628 
= 
ge ae fe ae i 
86 4886 0 


RXACT = 004000 Sore 





CVCLHC en ATA con i NK TEST 


CVCLHC.P11 
RXBUF 004150 


RXC_ = 800088 
RXCSR (0114 


RXD = 100 
RXENA = $ 
RXINEX 0 0 
RXINI 035716 


RXPTR - _ 206440 
RxQ 
RX THER 


"2 
136 
1%6 
26 

3 





REREEEEESES 
AAA 3 


PSRVrarsoFAuE 


on 
Sreenuus 
Wat 2 Om = = 


333 


808* 
1 


3 
6197 
6403 


6347 


6997 


7010 


5248 


kK 1 


MACY11_ 30A(1052)_ 23-MAR=82 16:43 PAGE 218 
CROSS REFERENCE TABLE -- USER SYMBOLS 


si 


64374 


197* 6666 6341 


719% 


7682 
7879* 


7283* 7319 
7411 


7157 7164 
7347 7357 
7799* 


SEQ 216 


6435* 


7699 


t 1 


CVCLHC_DPV-11 DATA COMM LaNK TEST MACY11_30A(1052)_23-MAR=82_ 16:43 PAGE 219 
CVCLHC.P11 22=MAR-B82 11: CROSS REFERENCE TABLE -- USER SYMBOLS 


SEQ 217 


SETEXP= 1 4 5168 5243 
STR: ae 

SHFO 14 128 

SHF1 145 193 


r~ 
OW 






LARUE POR) 


$908 5062 5095 5109 


25 
“ 
a8 
WwW 
vw 
NNW NNN Oo 


79 
AB 1 51 
SHTEND 09 10 5428 18 
TYPO 01354 23 01 
SHTYP1 01355 5 0184 
SHTYP. 1355 23 A 
SHTYP. 13564 5 01 
TYP4 013571 53 0184 
SHTYPS AEST 53 0184 
haa 13008 53 184 
SHTYP7? 01361 235 ay) 5" 
SHTYTB 00305 See 140 
02371 719 41124 4828 5153 
SIZE = sped 34 94 $393 5175 5181 
= 000010 68034 7160 7169 7262 7306 7360 7373 7552 7635 7694 7706 7775 7814 
= 000201 67844 7842 
SPAREO 037106 67434 
SPARE1 037107 67444 
00004 Sorter 2698 
SRXQ 016561 0184 3578 
SSTACK= 002000 68084 77 7779 7836 
STACK = 000007 e7yse 9397 fash 
= 
T 0 Sose | $861 «5156s 
STAIND 037206 556 $ 
STALST 037146 554 194 
TART O99ce4 oe 
TATB = 1 SSone 335 4136 5303 
STATUS= 000016 235004 2856 
STAOA 037256 6819 68684 
STAIA 037305 ore 
STAI0A 040003 682 
im eee 
AISA 56 $850 
AI14A 040354 6831 
STAISA 04045. 68 $8684 
STAI 0 68 68684 
STA17A 6834 
ST. 0. ; 1 
ST. 7 § 
TAGA 374 
STASA 7555 6824 
T. 7 6825 
STA7A 37721 6 
STRT = 7821 
STH, 91633 ae 3565 
= 194 1973 1975 1977 1979 1981 1983 1985 1987 1989 1991 1993 


n 1 

























CVCLHC DPV-11 DATA COMM. LINK TEST MACY11 30A(1052) 23-MAR-82 16:43 PAGE 220 — 
CVCLHC.P11 22-MAR-82 11: CROSS REFERENCE TABLE == USER SYMBOLS 
1997 1 1 3 007 1 15 21 
Btes 30a bua 308i Saas BONE 33 304i $047 
pong 4 a CO ch i awe 
136? 1366 138 1 1994 199. 
011 4 018 02 024 
0 036 3 44 04 0 5 
05 010 02 2 be 0 2g 
040 041 04 04 0 054 5 
059 06. 3070 07 073 
90 09 1 10 109 112 
116 119 4 34 348 354 
356 390 1 94 3 08 
08 18 19 $5 8 
&9 90 491 5 5 7 549 
51 67 568 571 57 79 582 
84 85 605 07 S 11 
13 14 
Z 7 OG? i 5 $f 705 
8 709 $e 709 Ay 745 
8 749 752 761 4 765 
767 777 778 781 790 
807 8 809 827 830 
868 8 874 877 5 
7 838 928 930 931 4124 41 4128 
4129 4130 4131 41 4180 4161 41 218 £190 
4168 431 4311 431 4314 4353 4355 4356 44 
4468. 44 4485 448 4490 449 4495 449 4509 
451 4511 451 4519 4521 45 4534 453 454 
454 4544 454 4546 45 45 4555 4573 45 
4608 4609 4610 4611 461 4618 46 ! 4621 rr 7 
4626 4627 4628 4629 463. 4634 46 - 4644 4674 
4 4689 4 4710 4717 47 4739 4771 
477 4 4811 481 4814 4815 481 4819 4822 
rire 483. 4837 483 4848 4849 4851 485 4864 
4865 4 486 48 4874 487 4877 489 4911 
4912 491 49146 491 492 49 4 49 4953 
4954 495 495 496 496 49 49 5070 
071 5072 13 140 514 14 14 1 5189 
AM ass 3853 ig 
eS: HR 5h 5699 dt 
528 3594 398 3546 3936 93) 61 eb ey ao? 
ol ee ee goss git e102 ie 
a i : i is We i 73st 
Snel a at 9 
SVCTAG= 1 19454 1 3034 3047 7 3095 4445 4547 
156 2100 30% 3047 s07s 3095 5278 0p 4645 


Nn 1 


CVCLHC_DPV-11 whe COMM. LINK TEST MACY11 30A(1052)_ 23-MAR=82 16:43 PAGE 221 
CVCLHC P11 22-MAR-82 11: CROSS REFERENCE TABLE -- USER SYMBOLS 


SVCTST= 1 19454 46754 

a 7s ioe * 6482" 6553" 7856s 

Ure EES aoe | 8098s 1 

SSLSYM= 010000 9458 31018 30624 30764 3 hs 
4560 4547 454 4660e | 47178 4 586 
§ 644 78908 79558 


SEQ 219 


TABEX 14307 
is * Se 
TALAOD= 60005 


S 
SNSoscee 
BSSSVAR= 
ery 


22222 2822 2 2 


4 
7 
3 
4 
5 


me 
Wo’ 
=UINWI— 


par 

— 

wo 
at 


QUW 


3933* 





B 2 


SEQ 220 
CVCLHC DPV=11 DATA COMM LINK TEST MACY11 30A(1052) 23-MAR=82 16:43 PAGE 222 
22=MAR-82 11: 





CVCLHC.P11 CROSS REFERENCE TABLE -- USER SYMBOLS 
TRIBN 03 4603* $6058 66984 7080 7085* 7181 7668 7769 
TRIBNQ 046 564 
TRVACT 024 & ‘ & ord 4250 4255 4260 4263 4283 4349 4372 4393 4417 
TRVALN 51 4 4 
TRVALP 0251 4211 43624 
ie ae ie 
TRVBRC 8 44 4 34 4 ti 4261 4266 4285 4359 4374 4395 4421. 
TRVDEC 024564 4214 4 Hird 
TRVERR 02442 4205 = 425 
mea Bon | BS eee 
TRVNOB 024414 424 ‘ $7 4284 4350 = 4373 4394 
TRVNUM ° 4576 421 42918 
TRVOCT 2348 421 42904 
TRVSPA 02451 4209 = 42694 
TRVSTR 025244 4215. 43998 
T = 00 748 = 6484 
TTL = 000001 064 4839 6024 
TTLL = 000010 ali $958 6026 
TTLLOP= 000044 ager 19 
TTOTCC oeeres > 4084 4781* 49 4917 4940" = =5112 
TURNON 03714 7584 6918 7111" 8 87718* 7767* 
TXACT = 00000 3694 
XBUF 003150 72h 64052 44791 5115 
= see: S$7 we 3274 
TXCSR = 011 4391* 4592* 5998* 6010  6023*  6026* 6047 6091* 6153 6254" 6267 6350 
g* * 6554* 662 7%4 7611 7859 
TXENA = 000020 3724 §=—66091 6254 6554 7859 
Roan 036300 73) 95 6503 65064 
TXI 36346 6486 64924 
TXI 036432 99 65044 
TXAM __= 000020 SoM = 607 39 «©6243 = 6498 $308 7788 0S (7807-7819 78 7841 
TXMTOT ad 407 4797* 4919" 4921 4942 5107 8 S1ill* 5353 54 5461 5486 
fee fae itt, ei 
TXPRC O37i16 hs eres 68 6971 7000 «= 7003* §=7027* 7040 7051 7233* 7284* 7322 7331* 
TXPREX Ob ge36 hs 4 7 19 
TXPROT 50 $36 aioe 6263" $99 * 7408" g +4 716307177, 7213s 7258 =— 7269S 7278 = 7300 
TXPTR 006442 S834 4 : 4067* 4 4077* 4079 4784% 4795 49208 4934% 4935 49398  5113* 
114 5365* 5437 see 5487 


TxQ = 22364 3269 
TXREAD 98 719g etoee | B58 94% 6979 758 771% 7873 


A 
a 1 
1 


7a 














C 2 





SEQ 221 
































3061 
44718 
7939 









CVCLHC DPV-11 DATA COMM, LINK TEST MACY11 30A(1052)_ 23-MAR-82_ 16:43 PAGE 223 
CVCLHC.P11 22-MAR-82 11: CROSS REFERENCE TABLE == USER SYMBOLS 
925 594 595 7. i 
TSC 505 3% * o3008 4 aby Sse ait 79254 793 79354 79398 79418 79458 79474 
TSERRN= 800009 hg Ed 56 $53 vn : § 577 60154 6052 61194 62724 63944 64198 66324 74534 
TSEXCP= 000000 3 3409 45424 §=64547 89648504 §=694855 865860 §=—5865 39 7925H §=—7929 = 79308 = 7934 02S 79478 
TSFLAG= 0 311 121 46364 Pye tird 47098 4711 47314 4733 48374 48974 
TSGMAN= 19454 1 3404 341 4539# 45484 48474 4850 485 58574 he see" 
TSHILI= 000 so0ed 45428 4546 48504 4854 58604 5864 79254 7928 79 79 79474 
TSLAST= 000001 19454 79898 
TSLOLI= 000001 sd 3407 45424 =64545 48504 4853 5860# 5863 7925 7927 79304 7932  7947# 
TSLSYM= 010000 19430 2101 3035 3048 2 076 0 3116 «663229 = 4446 4644 4660 = 466 
TSLTNO= 000001 tal . 4739 6440 6509 7954 890 793 
TSNEST= 177777 19054 19474 4 a g1008 ; 14 30344 30384 30474 20514 14 30654 30754 30854 
30954 31044 31154 $3 84 rested 4458 44554 44628 44718 46434 46554 S94 
46694 46954 3c03" 4 iv 4727h# = 47 o 47554 63394 oe 77# = =66508# 8675984 o3# 
04 7939-794 79534 799 
30 30. 3047 





on 
TSSAVL= 177777 19034 
= 

TSSUBN= 00000 19488 47560 

TSTAGL= 1 19454 

TSTAGN= 010024 ine ree 7954 siit74 70314 70658 30838 Ae yd 32034 4435# 4455# 44718 4655# 

TSTEMP= 000000 20614 et 30. 0474 ¥ 30754 30954 31154 31198 3120 32284 
ian i? te ee Gy tee tee ie ee es He 
79154 36 7392. Sa Ww # 5 

TSTEST= 1 19454 47548 799 

TSTSTM= 1 19454 1 3 4 8 58 2 7. 7 092 112 116 
cy a et Be ut te ee ime wee ee 

a7 rH 1 rf 4 153 1584 tye i? i083 44 4493 4499 

ot te oe Ge oh oe Be ie fey ae Be ee tee 
de i ae oe a a ie oR ae oe ae ie 
gi a at 2598 ei 285 2353 6617 1 6907 137 $539 452 

TSTSTS= 1 194 4 Sy 

TSSAU_= 01 ig pH 444 o73t 4738 

TSSAUT= 01001 S# 4659 

Hees sims HHS 

= 

T$ 1 4 

TSSHW = 01 20 1 

TSSINI= 01 q6714 He 4645, 

T 1 ew 3047 3051# = 3061 30654 3075 3085# 3095 3104# 3115 3119 





CVCLHC DPV-11 DATA C LINK TEST 
CVCLHC.P11 Joan cbe 11509 


XSFALS= 000040 
XSOFFS= 000400 
XSTRUE= 000020 
SPATCH 046552 
° = 046636 


PEWS 
Noone 
a 


VIWNS 


4 


—_ 
Be 


FUSS 


WU 
co 


Seve 
epee s 


3 
x 


Sronnr 
23 
2RVPR 


Sesx< 


9978 
4898 29 


oO 


dD 2 


MACY11_ 30A(1052) 23-MAR=82_ 16:43 PAGE 224 
CROSS REFERENCE TABLE == USER SYMBOLS 


64774 6508 
7804 27814 
sa 
8094 by 
re} | 2 
gon 38638 
Bele 2882s 
8954 28 
912% 291 
14 29364 
5a 564 
4954 25054 
7804 87. 
852% 28564 
01 


SEE OBMO@Dea ss) 
VoLSevervee 


SEQ 222 





i 


SEQ 223 
CVCLHC_DPV-11_ DATA com LINK TEST MACY11 30A(1052)_23-MAR-82 16:43 PAGE 226 
CVCLHC.P11 22=MAR~82 11: CROSS REFERENCE TABLE == MACRO NAMES 
BCOMPL 1#@ 8194658 44686 4489 4500 4832 
BERROR 14 19454 
BGNAU 1#@ 19454 4726 
BGNAUT 1#@ 19454 4654 
BGNCLN 14 19454 r¢ 94 
BGNDU 1#@ 19454 4704 
BGNHRD 14 19454 jel 
BGNHW 1 19454 2071 
BGNINI 1# 19454 4470 
BGNMOD 1#@ 19454 1946 
BGNASG 14 19454 30 3037-3050 3064 3084 3103 
BGNPRO 1#@ 19458 4454 
BGNPTA 1# 19454 
BGNRPT 1#@ 19454 4434 
BGNSEG 14 19454 
BGNSET 1# 19454 
BGNSFT 1#@ 19454 
BGNSRV 1#@ 19454 3202 6338 6476 7597 
BGN 1#@ 19454 
BGNSW 1# 19454 
BGNTST 1#@ 19454 4753 
BNC 1#@ 19454 4494 4512 4522 4533 4576 
BNERRO 14 19454 
BREAK 14@ 19454 6002 6056 6094 6258 6558 6598 6616 7136 7871 
BRESET 14 19454 4685 
CKLOOP 14 19454 
cul 1949# 2776 8 2777 778 3862779 780 781 2782 783 784 785 = 2786s 2787 = 2788 789 
2790 791 3 2794 795 796 st 801 80 803 804 $803 806 807 
2808 809 81 811 812 ols 814 81 4H +H 821 oes 82 824 825 
830 831 83 83 834 83 th 839 1 84 84 844 847 848 
849 850 851 852 855 856 85 858 860 1 8 863 864 866 86s 
2869 870 873 876 877 878 879 880 81 8 884 885 886 887 
2888 889 890 89 893 894 895 3+ 97 89 899 5 3 5 
7 1 11 912 915 918 91 2 921 $6 $ a $3 28 
So Size esr Sasa B53 Seed Sael| Saee 3468 Saee fo Rogge 2 
CLOCK Ld isese 4508 isi 
CLOSE 14 19454 
CLRVEC 14 19454 
COMMEN 14 19454 
LAY 14 19454 
DESCRI 1# 19454 3003 
DEVTYP 14 19454 3 
DISPAT 14 19454 57 
DISPLA 14 19454 
DOCLN 14 19454 4477 
DODU 14 19454 
DORPT 14 19454 
ENDAU 14 19458 4737 
ENDAUT 14 19454 4658 
ENOCLN 14 19454 4694 
ENDCOM 14 19454 
ENDDU 14 19454 4715 
ENDHRD 14 19454 ests 
ENDHW 14 8 19454 : 
ENDINI 1# 19454 4642 


F 2 
CVCLHC DPV-11 DATA COMM LINK TES? MACY11 30A(1052) 23-MAR-82 16:43 PAGE 227 
22=MAR=82 11: RO NAMES 


CVCLHC.P11 CROSS REFERENCE TABLE == MAC 
ENDMOD 1# 194 799 
ENDMSG 1 86194 303 3046 «= 330603074 2S 3094 3114 
ENDPRO 1# 19658 4461 
ENDPTA 1# 19454 
ENDRPT 1#@ 19458 4444 
ENDSEG 1# 19454 
ENDSET 1#@ 19458 
ENDSFT 1#@ 19454 
ENDSRV 1# 81965# 3227 6438 6507 7722 
ENDSUB 1# 19454 
ENDSW 1# 19454 
ENDTST 1 19454 7 
EQUALS 1# 19454 2116 
ERRDF 1# 19454 
ERRHRD 1# 19454 
ERROR 1#@ 19454 
ERRSF 14 8 19454 
ERRSOF 1@ 19454 5697 5715 5728 5771 6013 6050 6117 6270 
ERRTBL 14 19454 
ESCAPE 1# 19454 
EXIT 1# 8619658 3118 4635 4687 4708 4730 4836 4896 
FEQUAL 1# 19454 
GETBYT 1# 19454 
GETPRI 14 19458 
GETWOR 14 19454 
GAANIA 1# 19454 
GMANID 1 194658 3400 4538 4846 5856 
GAANIL 1# 19454 
GPHARD 1#@ 19454 4572 
GPRMD \¢ 19cs4 Sota aH 4539# 4542 48474 4850 58574 5860 
GPRML 1# 19454 714 795¢ 7940 
HEADER 14 19454 1963 
INLOOP 14 19454 
IOSETU 14 8 19454 
IOSTAR 1# 19454 
KT11 14 19454 
LASTAD 1# 19454 7987 
MANUAL 14 19454 4830 
MEMORY 14 19454 
MSBYTE 14 19458 19648 
MSCHEC 1#@ 19454 31194 48374 48978 
mas oO ise ee ee ae 
5474 7a 84 Z ; i 
491 & 49514 521 3 ; 
MSDATA 1# 19454 14 
1997 = 1999 1 1 
2029 $971 
MSDECR 7d | 5# 1 284 
MSDEFA 14 19454 5a 
NOE 1 194 1 Sige $338 
47384 ott 74 5 
MSERRI 1# 19454 60514 61184 62714 





6392 


6417 


6630 


7451 


SEQ 224 


7469 


SEQ 225 


MACY11_30A(1052)_ 23-MAR-82 16:43 PAGE 228 


CROSS REFERENCE TABLE -- MACRO NAMES 


SU ta 


CVCLHC_DPV-11 
CVCLHC.P11 





48974 4898 
44 
894 


we 
Me Be Se Ay MR te tM ee 
g Gsesese S Senso 
© BrSSo ee FSS 
- <- + UNS 
S oRSSAROBIRIAI 
nay RESSOSOONSOAS < 
2 SARA se Rowe 
SHESSATRSASIASEAS 
FRONRSSSCRS ASOD = seri 
SSH NUNS r— SESS SSSR 
SEtoDASRASoRINAATIIG BB sa achahio3s Bocq? 
PRORKROSSON SFBRSSSS AROO 
RSS SRENAIMSR SRS cee SESS SE S2S 
oe Sec 959230 
RSS ere ne a 





SRS CSRS arannomasonanns hin Sau ho} 
Epis Sarees re ee — $3 


sieciiniieaisaenoe 


Se ht Ld RUA 











Seas a SaaS 





BSsao RBSSo —— 
—— 


BARIIIASARIARASAALTINT OA 
SSSSSSES SS TOSER SSS SENSO 


SSSSEASARSRSAAZANAS ABTS 
Bs ge S BS5R SxSaneae 


MSESCA 
MSESCS 
MSEXCP 
MSEXIT 
| MSEXSE 
MSEXTJ 
MSGEN 
MSGENB 
MSGETS 
MSGETT 
MSGNGB 
MSGNIN 


H 2 


CVCLHC DPV-11 DATA, A. COMM LINK TEST MACY11 30A(1052) _23-MAR-82 16:43 43 «PAGE 229 
CVCLHC.P11  22=MAR-82 11 CROSS REFERENCE TABLE == MACRO 


SHEEEEREREREERE 
1 174 Kay 38 , hd 954 11 3 1 21348 oorie 
FURR R ERE EE 


SEQ 226 


oesine 
eS 


a 
zg 
-S 


791 79258 ee8 7927 = 792 7931 7352 79 79354 
37 794 79454 79478 ree 794 454 7951 795 79884 
oes 4 Mb of 74 34014 34 45394 4547 48478 485 58574 586 
MSGNTA 1# 19458 21 30 Faded 30618 75#@ 3095 3115# 32284 44454 46434 46594 46954 47168 
47384 6439# 65 7234 678898 3A 54 
MSGNTE 1#@ 19454 47548 
MSHAPT 1@ 19454 19644 
MSHNAP 1#@ 19454 19648 O05 
MSINCR 1#@ 19454 19474 20728 14 31 0354 OhS8 o3ee 514 84 5# 30728 
30764 4 1 1124 2034 7h 554 934 014 4 ane 
eked 364 5 571% 35854 144 748 1h 74 7084 37354 37514 Tee 
1# 37894 38094 8798 874 41314 41674 431 43568 44354 44554 
44718 44788 44834 44 44> 44998 45108 45208 4532 45398 4548 45544 457 1 on 
46298 25368 46554 4 9% 46744 864 4 964 4705# 47178 47278 47398 
47548 8647554 w 681468 48214 48314 4837 48474 485 48674 487 48974 49148 49 4955# 
49718 50714 51444 51898 5219% 52934 53424 5359% 5 57164 865 Cr 58274 58574 5866 
59248 59514 600 60144 514 574 954 1184 § SoM § 74 $3 oA 63° 64774 65598 
nei0se on $s) S 14 69074 71378 894 74528 74708 984 72# 8678908 
MSLDRO 4 Hb af 74 44820 44878 44924 44984 4509% 4519% 45734 46334 46734 
MSMCHI 1# 19454 
MSMCLO 14 19454 
nSPOP ie 19034 21 24h 7a 14 30754 #@ 3115 32288 44458 4462# 46434 46598 46954 
nly TE Oe Mae Hee te ae Bee 
MSPRIN 1 19454 a4 rd 87# = 31 3444 ; 5 3 $5208 % 78 33 
5478 35678 84 7a 7a ++ 14 7454 8 37 7778 
748 41248 4&4 431 3 45514 47699 pe 14 
49108 49 49674 3 lee 3 hd 3 rh 5 59214 
MSPUSH aeons 47038 9 ie “yd as 1 0 44358 44558 44718 46554 
MSPUT 1 194 Bre = 31 5 7 334 
ae tee a ie ep hie Hee He Hee 
4a 5 1 ; 5314 1 7 
ps thd 3 144 49518 49678 # 51398 51864 S2lé# 5 53 
MSPUT1 04 73 5 54 55 26 7a 
a : 4 ; 7a + 


g 





cases ae 
SoeSes 
% 


moe He eh ae oe de oe 


é 


CVCLHC hh RS ea Be TEST 


CVCLHC.P11 
4819 


& y 
7S8be 


oad ob a et 
RRR 


FE GSABLEGGSIAS =F 
GRaSy Shasseey goudseS 
Sevres 


set 


x 


48 


ress 


SEER 
SVRVeeeY 


eeotrasey 


S 


4969. 


5340 


11 
3 
7 
91 


79454 
779 
794 

¥ 
7 
92 


I 2 


MACY11 30A(1052)_ 23-MAR-82 16:43 PAGE 230 
CROSS REFERENCE TABLE <= MACRO NAMES 


7 


; 


74 4911 9 
9 2339 ; 
4a 9214 

79254 
4575 
Sf 


i 
1 
i, 
7a 
9 


4878 


oe 


14 1 of abe 
Q " t 
$e eats 


Riper fatto pe 
SeReeSeeu es aeN 


eect 


yeu 
See 


SIs 
se- 


w 
wa 
2 


e333 


Fas6 


Or 
SR 
“sS 


Sry 
Veessez 


4“ SNS 
Fiend ad 


st & 


NS 
Sy 
eeea 


42 


FAS 
—_ 
Oo 


SEQ 227 


4953 


8506. 





J2 


CVCLHC DPV=-11_DATA CON LINK TEST MACY11 30A(1052) 23-MAR-82 16:43 PAGE 231 
22=MAR=82 11: 0 NAMES 


CVCLHC.P11 


BRR eH 


N 14 19454 

PRINTS «tH 1948H $092 «3039305 

PRINT dw jocse «S308 305) 3589 
4550 ofSt 481 48 487 
5355 582 59 94 728 

PRINTS 1 19454 35 5 3577 
3776 83785 0 82 4123 

PRINTX 14 19454 

RE 1 19454 45 

READEF 14 19458 4481 4486 4491 

RFLAGS 14 19454 

SETPRI 14 19454 4632 467 

SETVEC 1#@ 19454 4607 461 4624 

SLASH 14 19454 

STARS 1#@ 19454 

SVC 1# 19454 

XFER 1# 19454 119% 46364 46884 

XFERF 1# 19454 4 

XFERT 14 19454 7938 

- ABS. 046636 000 


ERRORS DETECTED: 0 
CVCLHC,CVCLHC.LST/CRF/SOL=SVC34R.MLB8,CVCLHC.P11 
RUN-TIME: 27 


RUN-TIME RATIO: 101/66=1.5 
CORE USED: 22K (43 PAGES) 


CROSS REFERENCE TABLE == MACRO 


gi46 gi, gies 
446 44 4 
461 62 6 
0 0 105 
tar ae 
7606 3633 3656 


4816 6902 


47094 47314 48374 


Cn cn 


3546 3863 873 88 
4966 5066 138 18 


3666 8 8=—. 3681 3695 3702 


48974 


533 


927 
215 


3728 


$3 


4309 
5289 
3744 


SEQ 228 
$35 


435 
53. 


3759 


